Мой период `.` передаст фрейм данных с помощью dplyr, но не ggplot

Question

Прошу прощения за мою (возможно) неверную терминологию, но я буду стараться изо всех сил:

library(tidyverse)
mtcars %>% 
  count(cyl) %>% 
  ungroup() %>% 
  mutate(cyl = factor(cyl, levels = .$cyl)) %>%  # line 5
  ggplot(aes(cyl, n)) + 
  scale_x_continuous(expand = c(0, 0), limits = c(0, max(.$n) * 1.1)) + 
  geom_line()

Моя строка 5 будет правильно передавать текущий фрейм данных через мой синтаксис с .$n. Но строка № 7 не будет с .$cyl.

Я получаю ошибку "объект". ' не найдено ". Я попробовал эту оболочку {max(.$n)} из небольшого поиска, но, похоже, это не сработало.

Answer 1

Это работает для меня:

     mtcars %>% 
          count(cyl) %>% 
          ungroup() %>% 
          mutate(cyl = factor(cyl, levels = .$cyl)) %>%  # line 5
          {
           ggplot(., aes(x = cyl, y = n, group = 1)) + 
            scale_y_continuous(expand = c(0, 0), limits = c(0, max(.$n) * 1.1)) + 
            geom_line()
          }