请原谅我(可能)不正确的术语,但我会尽力而为:
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)}
,但这似乎没有用。
答案 0 :(得分:2)
这对我有用:
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()
}