我有几个通用函数绘制ggplot
. 现在我想将它们组合成新的情节,但不知何故layout()
不起作用。
我做了这个例子来表明我的观点:
plot_func_1 = function(){
data1 <- data.frame(matrix(c(1:10), ncol=2))
colnames(data1) <- c("name", "value")
ggplot(data = data1) +
geom_boxplot(aes(x = 1, y = value))
}
plot_func_2 = function(){
data2 <- data.frame(matrix(c(11:20), ncol=2))
colnames(data2) <- c("name", "value")
ggplot(data = data2) +
geom_boxplot(aes(x = 1, y = value))
}
plot_func_1_func_2_combined = function(){
mat <- matrix(c(1,2), ncol = 2)
layout(mat, width = c(0.5, 0.5))
plot_func_1()
plot_func_2()
}
plot_func_1_func_2_combined()
plot_func_1_func_2_combined()
应结合plot_func_1()
并plot_func_2()
成一个图形。但相反,只显示了第二个图。我怎样才能改变它?
附加信息:这个问题在基本plot
功能中似乎不存在,这里它起作用了:
plot_func_1 = function(){
plot(1:5)
}
plot_func_2 = function(){
plot(10:15)
}
plot_func_1_func_2_combined = function(){
mat <- matrix(c(1,2), ncol = 2)
layout(mat, width = c(0.5, 0.5))
plot_func_1()
plot_func_2()
}
plot_func_1_func_2_combined()
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句