![](/img/trans.png)
[英]facets as in facet_grid, and axis.line as for facet_wrap?
[英]naming facets in facet_wrap
我在尝试命名使用facet_wrap功能创建的一组绘图时遇到问题。 我专门尝试将标题包装到多行上。 我已在堆栈溢出中广泛研究了此问题,但找不到我正在生成的错误。 代码如下。 a2 $ variable是一列字符串(出于分组目的),a2 $ ma_3和a2 $ ma_12是我尝试绘制的移动平均值。 生成的错误是:
as.integer(n)中的错误:无法将类型“ closure”强制转换为类型“ integer”的向量
p1=a2 %>%
ggplot(aes(x = date, color = variable)) +
geom_line(aes(y = ma_12), color = "aquamarine3", alpha = 0.5,size=.7) +
geom_line(aes(y = ma_3), color = "gray40", alpha = 0.5,size=.7) +
facet_wrap(~ variable, ncol = 3, scale = "free_y",label_wrap_gen(width=10))
提前致谢。
我建议先格式化变量,然后再将其发送到ggplot,如下所示:
library(tidyverse)
mtcars %>%
rownames_to_column() %>%
head() %>%
mutate(carname = stringr::str_wrap(rowname, 10)) %>%
ggplot(aes(x = mpg, color = cly)) +
geom_point(aes(y = wt), color = "aquamarine3", alpha = 0.5,size=5) +
geom_point(aes(y = qsec), color = "gray40", alpha = 0.5,size=5) +
facet_wrap(~ carname, ncol = 3, scale = "free_y")
你近了 要修改facet_wrap
标签,我们使用labeller
的参数:
library(tibble)
library(ggplot2)
mtcars %>%
rownames_to_column() %>%
head() %>%
ggplot(aes(x = mpg, color = cly)) +
geom_point(aes(y = wt), color = "aquamarine3", alpha = 0.5,size=5) +
geom_point(aes(y = qsec), color = "gray40", alpha = 0.5,size=5) +
facet_wrap(~ rowname, ncol = 3, scale = "free_y",
labeller = label_wrap_gen(width = 10))
输出:
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.