faahkoISAzip <- system.file("extdata","faahKO-metadata.zip", package="Risa")
faahkoISA <- readISAtab(zipfile = faahkoISAzip, path = file.path(system.file("extdata", package="Risa"),"faahkoISA"), verbose =TRUE)
faahkoADF <- getAnnotatedDataFrameAssay(faahkoISA, faahkoISA@assay.filenames[[1]])
str(faahkoADF)
armstrongISAzip <- system.file("extdata","ARMSTRONG-S-3-metadata.zip", package="Risa")
armstrongISA <- readISAtab(zipfile = armstrongISAzip, path = file.path(system.file("extdata", package="Risa"),"armstrongISA"), verbose =TRUE)
armstrongADF <- getAnnotatedDataFrameAssay(armstrongISA, armstrongISA@assay.filenames[[1]])
str(armstrongADF)
Run the code above in your browser using DataLab