Как сделать подмножество из AOV резюме в R?

Question

Может быть, это простой вопрос, но мне интересно, как я могу установить подмножество DF и F.values для терминов, фигурирующих в сводке aov?

Например, , используявстроенный набор данных base R npk, как извлечь остаточные и другие DF s и F.values, которые появляются в сводке по следующей модели:

fit <- summary(aov(yield ~ block + N * P + K, data = npk)) # example is fully reproducible

PS Я ищу решения на базе R.

Answer 1

Выход fit представляет собой list из length 1 (проверяя str(fit)).Мы извлекаем его с помощью [[, а затем делаем $ или [[, чтобы извлечь компоненты

fit[[1]]$Df
#[1]  5  1  1  1  1 14 #where 14 is the Residuals df
fit[[1]]$`F value`
#[1]  4.391098 12.105541  0.537330  6.088639  1.361073        NA