определить r квадрат в зависимости от 1 фактора

Я получаю данные с одним фактором. Фактор ref_fruit. Итак, мой скрипт выглядит так, чтобы получить R_square для каждого фактора (с MF, зависящим от heure):

models <- dlply(P1, "ref_fruit", function(df)
  lm(MF ~ heure, data = df))

ldply(models, coef)
l_ply(models, summary, .print = TRUE)

проблема в том, что список, который я получаю с квадратом R, каждый раз действительно высок: около 0,998. Это не то, что я наблюдал с excel.

И другая проблема: я получил это сообщение после выполнения:

ldply(models, coef)

Ошибка в fs[[i]](x,...) : попытка применить нефункцию.

Может кто-нибудь помочь мне, пожалуйста?


r linear-regression plyr r-factor
person Rodolphe Roussel    schedule 19.02.2018    source источник

Ответы (1)


arrow_upward
0
arrow_downward

Ваша проблема почти идентична этому примеру для dplyr показанного здесь. Вы не предоставили никаких данных, но они должны быть...

require(dplyr)
by_fruit <- group_by(df, ref_fruit)
models <- by_fruit %>% do(mod = lm(MF ~ heure, data = .))
models
summarise(models, rsq = summary(mod)$r.squared)
person Chuck P    schedule 19.02.2018