datatab <- read.table(system.file("doc", "expl1_cellsurvcurves.txt", package="CFAssay"), header=TRUE, sep="\t")
X <- subset(datatab, cline=="okf6TERT1") #Specification of curve
pes(X)
pes(subset(datatab, cline=="cal33") )
Run the code above in your browser using DataLab