Почему я не могу вписать модель в функцию? «Ошибка в eval (extras, data, env): объект« данные »не найден»

Question

Я подгоняю модели в rstanarm. Что не работает, когда я подгоняю модель к вызову функции? Я делаю:

mod <- stan_glm(form, data, weights=data[['weight']])

Где data это data.frame и form это формула. и модель подходит. Я делаю:

f <- function(data){
      return(fit.model(form, data, weights=data$weight))
}

Я получаю Error in eval(extras, data, env) : object 'data' not found

Редактировать: мне не удалось создать воспроизводимый пример, но я нашел обходной путь, вызвав assign в своей функции ,

f <- function(data){
      assign("data",data, globalenv())
      return(fit.model(form, data, weights=data$weight))
}