data1 <- read.csv(system.file("extdata", "data_2factorBlock3ref.csv", package = "rtpcr"))
ANOVA_DDCt(data1,
numOfFactors = 2,
numberOfrefGenes = 3,
block = "block",
specs = "Concentration",
p.adj = "none")
data2 <- read.csv(system.file("extdata", "data_1factor_one_ref.csv", package = "rtpcr"))
ANOVA_DDCt(data2,
numOfFactors = 1,
numberOfrefGenes = 1,
block = NULL,
specs = "Condition",
p.adj = "none",
se.type = "single.group")
# Repeated measure analysis
a <- ANOVA_DDCt(data_repeated_measure_1,
numOfFactors = 1,
numberOfrefGenes = 1,
block = NULL,
specs = "time",
p.adj = "none", model = wDCt ~ time + (1 | id))
a$perGene$Target$ANOVA_table
# Repeated measure analysis: split-plot in time
a <- ANOVA_DDCt(data_repeated_measure_2,
numOfFactors = 2, numberOfrefGenes = 1,
specs = "time", block = NULL,
model = wDCt ~ treatment * time + (1 | id))
Run the code above in your browser using DataLab