Ошибка R: эстетика должна быть действительными столбцами данных. Проблемати c Эстети c (s)

Question

Выполнен следующий код, но получаю ошибку, как указано в заголовке. Пожалуйста, помогите.

set.seed(1234)
title_word_pairs %>%
  filter(n >= 1000) %>%
  graph_from_data_frame() %>%
  ggraph(layout = "fr") +
  geom_edge_link(aes(edge_alpha = n, edge_width = n), edge_colour = "cyan4") +
  geom_node_point(size = 5) +
  geom_node_text(aes(label = name), repel = TRUE, 
                 point.padding = unit(0.2, "lines")) +
  ggtitle('Word network in Oppo Reno2 reviews')
theme_void()

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

Ошибка:

Aesthetics must be valid data columns. Problematic aesthetic(s): edge_alpha = n, edge_width = n. Did you mistype the name of a data column or forget to add stat()?