Я использовал этот код для выполнения одностороннего анализа ANOVA
anova_models <- lapply(mock_data[sapply(mock_data, is.numeric)], function(x,f) aov(x~f), f=mock_data$weather)
цитата для кода .Чтобы вычислить тест Лишера Фишера, и попытался использовать код
library(agricolae)
lsd.test <- LSD.test(anova_models, weather, p.adj = "fdr", group = FALSE)
, но он не работал.Не могли бы вы помочь мне, как выполнить One way ANOVA и Fisher LSD для кадра данных. Вот файл данных. Большинство примеров относятся к одному числовому столбцу и категориальному столбцу.Что можно сделать для нескольких числовых столбцов и одного категориального столбца?