我试图在ggplot facet标签中显示下标,其中下标中有混合字母和数字parse().
这有效:
>parse(text="cI[933]")
Run Code Online (Sandbox Code Playgroud)
这样做:
>parse(text="cI[W]")
Run Code Online (Sandbox Code Playgroud)
但不是这些:
>parse(text="cI[933W]")
Error in parse(text = "cI[933W]") : <text>:1:7: unexpected symbol
1: cI[933W
^
> parse(text="cI[9W33]")
Error in parse(text = "cI[9W33]") : <text>:1:5: unexpected symbol
1: cI[9W33
^
Run Code Online (Sandbox Code Playgroud)
有关ggplot的示例:
data(mtcars)
mtcars$cyl2 <- factor(mtcars$cyl, labels = c("cI[123]", "cI[ABC]", "cI[456]"))
qplot(wt, mpg, data = mtcars) + facet_grid(. ~ cyl2, labeller = label_parsed)
Run Code Online (Sandbox Code Playgroud)
这很好,但是:
data(mtcars)
mtcars$cyl2 <- factor(mtcars$cyl, labels = c("cI[AB3]", "cI[2CD]", "cI[EF1]"))
qplot(wt, mpg, data = mtcars) + facet_grid(. ~ cyl2, labeller …Run Code Online (Sandbox Code Playgroud)