nem <- read_nem2(tab = nemtab, tax = nemtax, meta = nemmeta)
nem_plot <- nem |> calc_compare(.group = Treatments,
y = Mesorhabditis,
method = LSD) |>
nem_plot()
nem_plot
nem_plot <- nem |> calc_compare(.group = Treatments,
y = Mesorhabditis,
method = HSD) |>
nem_plot(type = 2, add = "mean_se")
nem_plot
Run the code above in your browser using DataLab