## Not run:
# require(PREDAsampledata)
#
# CNdataPath <- system.file("sampledata", "CopyNumber", package =
# "PREDAsampledata")
#
# CNdataFile <- file.path(CNdataPath , "CNAG_data_PREDA.txt")
#
# CNannotationFile <- file.path(CNdataPath , "SNPAnnot100k.csv")
#
# CNStatisticsForPREDA<-StatisticsForPREDAFromfile(file=CNdataFile,
# ids_column="AffymetrixSNPsID", testedTail="both", sep="\t",
# header=TRUE)
#
# ## End(Not run)
Run the code above in your browser using DataLab