# \donttest{
probe_data <- data.frame(
group = c("probe_a", "probe_b", "probe_c"),
size = c(10, 10, 10), # Equal sample sizes
mean = c(43.00000, 33.44444, 35.75000),
sd = c(4.027682, 9.302031, 16.298554)
)
# Perform Hartley's Fmax test
result <- fmax_test(
levels = probe_data$group,
n = probe_data$size,
sd = probe_data$sd
)
# }
Run the code above in your browser using DataLab