使用 facet_wrap 绘制融化的变量

Question

我想创建一个有 6 个面的图。

我正在使用融化的dataset。

使用时：

ggplot(g,aes(x = x, y = value, colour = variable, linetype = variable,size = variable)) + 
    geom_line() + facet_wrap(.~condition)

我得到错误：

Error in layout_base(data, vars, drop = drop) : 
  At least one layer must contain all variables used for facetting

我不明白这意味着什么，因为我在变量“条件”中有用于分面的变量

Here 是创建融合变量的原始数据。

这是我用来制作情节的代码：

ggplot(g,aes(x = x, y = as.numeric(value), colour = varible, linetype = variable,size = variable)) + 
    geom_line() + 
    scale_x_continuous(breaks=seq(1,10,1)) +
    scale_y_continuous(breaks=seq(0,1, 0.1))+
    scale_colour_manual(values=c("red3","red3","red3","red3", "red3","red3","red3", "red3","red3",   
    "blue3","blue3","blue3","blue3","blue3","blue3","blue3","blue3","blue3")) + 
    scale_linetype_manual(values = c(1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2)) + 
    scale_size_manual(values = c(0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4,0.4)) + 
    xlab("\nTime-steps") + 
    ylab("Proportion correct\n") +
    theme_bw() +
    theme(axis.text=element_text(size=5),
          axis.title=element_text(size=5),
          axis.line = element_line(size=0.25),
          axis.ticks=element_line(size=0.25),
          panel.grid.major = element_blank(),
          panel.grid.minor = element_blank(),
          panel.border = element_blank(),
          panel.background = element_blank(),
          legend.position="none" ,
          legend.direction="vertical", 
          legend.title=element_blank(),
          legend.text=element_text(size=6), 
          legend.background=element_blank(), 
          legend.key=element_blank())+facet_wrap(~condition)

Answer 1

您有两个主要问题 - y 被编码为一个因子并且应该是数字，更重要的是，您的 facet_wrap 术语中有一个小错字，应该没有 .：

p <- ggplot(g,aes(x = as.numeric(x), y = as.numeric(value), group = variable)) 
p <- p + geom_line()
p <- p + facet_wrap(~condition)
p

这给了我

编辑：我注意到变量嵌入了大小编码。这很好地将其包含在图表中：

g$size<-substring(g$variable,1,5)

然后在美学中添加colour = size即可得到：