[text] Test

Viewer

  1. # Create vectors for the data
  2. control_group <- c(21.97)
  3. experimental_group <- c(19.31, 18.78, 15.50)
  4.  
  5. # Perform ANOVA test
  6. result <- aov(c(control_group, experimental_group) ~ c(rep("Control", length(control_group)), rep("Experimental", length(experimental_group))))
  7.  
  8. # Summary of ANOVA test
  9. summary(result)
  10.  

Editor

You can edit this paste and save as new:


File Description
  • Test
  • Paste Code
  • 20 Apr-2024
  • 317 Bytes
You can Share it: