# NOT RUN {
annots <- data.frame(
key = c("assay", "fileFormat", "fileFormat", "fileFormat", "species"),
value = c("rnaSeq", "fastq", "txt", "csv", "Human"),
columnType = c("STRING", "STRING", "STRING", "STRING", "STRING")
)
dat1 <- data.frame(x = 1)
dat2 <- data.frame(assay = "rnaSeq")
valid_annotation_keys(dat1, annots)
valid_annotation_keys(dat2, annots)
# }
Run the code above in your browser using DataLab