Closed tcrombie closed 4 years ago
Flag added to checkGenotypes
only.
# Make a dataframe for s_labels in Fulcrum but not in the genotyping sheet
s_label_in_geno_not_in_fulcrum <- fulc_data %>%
dplyr::filter(!is.na(s_label)) %>%
dplyr::filter(!(s_label %in% geno_data$s_label))
print(paste("There are", nrow(s_label_in_geno_not_in_fulcrum), "s labels in the fulc_data not in the geno_data, these s labels are:", sep = " "))
if(nrow(s_label_in_geno_not_in_fulcrum) > 0){print(s_label_in_geno_not_in_fulcrum$s_label)}
closing this issues and marking as done. Checked with 2020FebruaryAustralia dataset.
Add
flag_geno_s_labels_not_in_fulcrum
to theprocGenotypes
andcheckGenotypes
functions. There are many cases in the 2020FebruaryAustralia collection with no s-labels in the genotyping sheet.