# NOT RUN {
df <- effect_size_additive(Control_N = 4,
Control_SD = 0.114,
Control_Mean = 0.90,
StressorA_N = 4,
StressorA_SD = 0.11,
StressorA_Mean = 0.77,
StressorB_N = 3,
StressorB_SD = 0.143,
StressorB_Mean = 0.72,
StressorsAB_N = 4,
StressorsAB_SD = 0.088,
StressorsAB_Mean = 0.55,
Small_Sample_Correction = TRUE,
Significance_Level = 0.05)
#loading up an example dataset from the multiplestressR package
df <- multiplestressR::survival
#calculating effect sizes
df <- effect_size_additive(Control_N = df$Sample_Size_Control,
Control_SD = df$Standard_Deviation_Control,
Control_Mean = df$Mean_Control,
StressorA_N = df$Sample_Size_Temperature,
StressorA_SD = df$Standard_Deviation_Temperature,
StressorA_Mean = df$Mean_Temperature,
StressorB_N = df$Sample_Size_pH,
StressorB_SD = df$Standard_Deviation_pH,
StressorB_Mean = df$Mean_pH,
StressorsAB_N = df$Sample_Size_Temperature_pH,
StressorsAB_SD = df$Standard_Deviation_Temperature_pH,
StressorsAB_Mean = df$Mean_Temperature_pH,
Significance_Level = 0.05);
# }
Run the code above in your browser using DataLab