绘图时，aes必须长度为1

Question

我只想尝试制作一个简单的比较图形函数：

Compare=function(a,b,c,d){
assign("d1",a)
assign("d2",b)
assign("d3",c)
assign("d4",d)

g1=ggplot()+geom_line(data=d1, aes(x=d1[,1],d1[,2],group=1,colour=a))+geom_line(data=d2, aes(x=d2[,1],d2[,2],group=1,colour=b))
g2=ggplot()+geom_line(data=d3, aes(x=d3[,1],d3[,2],group=1,colour=c))+geom_line(data=d4, aes(x=d4[,1],d4[,2],group=1,colour=d))

  multiplot(g1,g2,cols=2)
}

但我不断收到错误：不知道如何自动选择data.frame类型的对象的比例。违约持续。  显示追溯

重新运行Debug  错误：美学必须是长度1或与数据（901）相同：x，y，组，颜色