У меня есть следующая модель регрессии с преобразованиями:

fit <- lm( I(NewValue ^ (1 / 3)) ~ I(CurrentValue ^ (1 / 3)) + Age + Type - 1,
           data = dataReg)
plot(fit)                                                                      

Ноplot дает мне следующую ошибку:

Error: $ operator is invalid for atomic vectors

Есть идеи о том, что я делаю не так?

Заметка: summary, predict, а такжеresiduals все работает правильно.