formulation_data <- data.frame(
Excipient_Concentration = runif(100, min = 0, max = 1),
Drug_Release = rnorm(100, mean = 50, sd = 10),
Particle_Size = rnorm(100, mean = 100, sd = 20)
)
anova_analysis(formulation_data)
Run the code above in your browser using DataLab