Извлечение кадра данных из объекта модели lm

Question

Простой вопрос, на который я не смог найти ответ.

Я ищу функцию, которая извлекает имя фрейма данных, используемого в качестве входных данных из объекта модели lm.

Так, например, если я запускаю

model <- lm(mpg ~ cyl, data = mtcars)

Мне нужна функция типа

data.name(model)

, которая производит

mtcars

Я смотрел здесь и здесь но они, кажется, не дают мне то, что я ищу , Например, если я не использую model.frame() неправильно, он просто дает мне фрейм данных с терминами, использованными в модели, а не исходный фрейм входных данных.

Answer 1

model$call$data дает вам mtcars (неоцененный символ); deparse(model$call$data) дает вам "mtcars" (строка). eval(model$call$data) возвращает исходный объект данных, если он доступен в текущей среде.