grid.arrange() 输出在 R Markdown 中添加空白 space 和额外的绘图
grid.arrange() output adding blank space and extra plot in R Markdown
我正在努力弄清楚如何在 R Markdown 中很好地绘制两个 transform()
(dlookr 库)图。以下代码生成此 post 中包含的图片的输出。我想要最后一个地块 (2x2),并且想知道为什么其他两个地块也在填充。 Markdown怎么只打印最后一个?
# payment transformation
payment_log <- transform(my_data$payment, method = "log")
# income transformation
income_log <- transform(my_data$income, method = "log")
grid.arrange(
plot(payment_log,typographic=FALSE), # visual of transformation
plot(income_log,typographic=FALSE), # visual of transformation
ncol=1)
前两个图可以通过将每个图包装在 as.grob
内的 function
调用中来避免,然后将这些变量传递给 grid.arrange
。
library(dlookr)
library(ggplotify)
my_data=data.frame(payment=c(1,2,2,3,3,3,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9),
income=c(1,2,2,3,3,3,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9))
payment_log=transform(my_data$payment, method="log")
income_log=transform(my_data$income, method="log")
x=as.grob(function() plot(payment_log))
y=as.grob(function() plot(income_log))
grid.arrange(grobs=list(x,y), ncol=1)
我正在努力弄清楚如何在 R Markdown 中很好地绘制两个 transform()
(dlookr 库)图。以下代码生成此 post 中包含的图片的输出。我想要最后一个地块 (2x2),并且想知道为什么其他两个地块也在填充。 Markdown怎么只打印最后一个?
# payment transformation
payment_log <- transform(my_data$payment, method = "log")
# income transformation
income_log <- transform(my_data$income, method = "log")
grid.arrange(
plot(payment_log,typographic=FALSE), # visual of transformation
plot(income_log,typographic=FALSE), # visual of transformation
ncol=1)
前两个图可以通过将每个图包装在 as.grob
内的 function
调用中来避免,然后将这些变量传递给 grid.arrange
。
library(dlookr)
library(ggplotify)
my_data=data.frame(payment=c(1,2,2,3,3,3,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9),
income=c(1,2,2,3,3,3,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9))
payment_log=transform(my_data$payment, method="log")
income_log=transform(my_data$income, method="log")
x=as.grob(function() plot(payment_log))
y=as.grob(function() plot(income_log))
grid.arrange(grobs=list(x,y), ncol=1)