filePath <- system.file("extdata", "Agilent4x180K.txt.bz2", package = "rCGH")
cgh <- readAgilent(filePath, sampleName = "Agilent4x180K", labName = "myLab")
# Getting all the information
getInfo(cgh)
# Getting specific items
getInfo(cgh, c("sampleName", "labName"))
Run the code above in your browser using DataLab