'Hidden' variable names (names prefixed with .) are not found

[cpsievert]

This should work, but currently doesn't, since add_trace() only knows about the data that is input to plot_ly()

library(plotly)
library(broom)
library(dplyr)
economics %>%
  mutate(rate = unemploy / pop) %>%
  plot_ly(x = date, y = rate) %>%
  loess(rate ~ as.numeric(date), data = .) %>%
  augment() %>%
  add_trace(y = .fitted)

#> Error in eval(expr, envir, enclos) : object '.fitted' not found

[cpsievert]

Actually, the problem had to do with using as.list(), which has a default of all.names = F meaning that "hidden" variables (variables prefixed with .) are not returned by default.