calculateDRCData

Share:

Description

For a given cut time, calculate values from the growth curves in a IncucyteDRCSet object

Usage

1
calculateDRCData(idrc_set, cut_time = NULL)

Arguments

idrc_set

IncucyteDRCSet object

cut_time

Desired cut time. If NULL will use the cut_time in the IncucyteDRCSet object (if set)

Value

IncucyteDRCSet object

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
pm_file <- system.file(file='extdata/example.PlateMap', package='IncucyteDRC')
test_pm <- importPlatemapXML(pm_file)
data_file <- system.file(file='extdata/example_data.txt', package='IncucyteDRC')
test_data <- importIncucyteData(data_file, metric='pc')

test_list <- splitIncucyteDRCPlateData(test_pm, test_data, group_columns='growthcondition')

print(test_list)

test_idrc_set <- fitGrowthCurvesGrouped(test_list[[2]])
test_idrc_set <- fitGrowthCurvesIndividual(test_idrc_set)
plotIncucyteDRCSet(test_idrc_set, grouped=FALSE)
plotIncucyteDRCSet(test_idrc_set, grouped=TRUE)
test_idrc_set <- calculateDRCData(test_idrc_set, cut_time=100)
print(test_idrc_set)
test_idrc_set$drc_data
plotIncucyteDRCSet(test_idrc_set)