data <- read.csv(system.file("extdata", "data_3factor.csv", package = "rtpcr"))
# Obtain a fitted model from ANOVA_DDCt
res <- ANOVA_DDCt(
data,
numOfFactors = 3,
numberOfrefGenes = 1,
mainFactor.column = 1,
block = NULL)
# Relative expression values for Type main effect
lm <- res$perGene$PO$lm
Means_DDCt(lm, specs = "Type")
# Relative expression values for Concentration main effect
Means_DDCt(lm, specs = "Conc")
# Relative expression values for Concentration sliced by Type
Means_DDCt(lm, specs = "Conc | Type")
# Relative expression values for Concentration sliced by Type and SA
Means_DDCt(lm, specs = "Conc | Type * SA")
Run the code above in your browser using DataLab