R Grid.Table图相互重叠答案

【问题标题】：R Grid.Table Plots Overlapping Each OtherR Grid.Table图相互重叠
【发布时间】：2014-04-24 13:43:57
【问题描述】：

几天前刚开始学习 R （并且是这个网站的新手），并且能够通过搜索这个网站/Google 来解决问题，但是这个问题真的让我很难过。

背景：我正在将 data.frame 中的返回值绘制到 PerformanceAnalytics chart.CumReturns 中，并将另一个 data.frame 绘制到 gridExtra grid.table 中。我正在尝试使用 mfrow=c(2,1) 排列它们，并且 chart.CumReturns 图表排列正确，但 gridExtra grid.table 仍然在中心绘制，与另一个图表重叠。代码（我可以发布的）和图表图片如下。几个小时以来一直在寻找解决方案，尝试使用 grid.arrange，但在这个解决方案上空无一物......感谢任何帮助。

**抱歉，无法发布图片。想象一下位于绘图区域顶部的性能分析图表，gridextra 表在中心重叠。

部分代码（意识到这个prob不是优化代码，现在只是尝试学习基础知识）：

library(quantmod)
library(PerformanceAnalytics)
library(gridExtra)

G2 <- read.csv(file = "Data.csv", header = TRUE)

par(mfrow=c(2,1))

chart.CumReturns(cbind(G2DailyReturn,G2MyReturn),
             wealth.index = FALSE,
             geometric = FALSE,
             main = "G2", 
             ylab = "Tick Return",
             par(cex = 1, cex.lab = 0.9),
             cex.axis = 0.55,
             col=rich6equal, 
             legend.loc="topleft")

table.test <- table.CalendarReturns(G2MyMoReturn, digits = 0, 
                                as.perc = FALSE, geometric = FALSE)

grid.table(data.frame(table.test), 
       gpar.coretext = gpar(fontsize=12, fontface="bold", col="black"), 
       gpar.coltext  = gpar(fontsize = 12,col="black", fontface="bold"), 
       gpar.rowtext  = gpar(fontsize = 12, fontface="bold"),
       gpar.corefill = gpar(fill="cadetblue1",alpha=0.5), h.even.alpha = 0.5)

【问题讨论】：

标签： r quantmod gridextra performanceanalytics

【解决方案1】：

男人、神话、传说……“Bo-Finger”借助下面的问题解决了这个家伙。感谢该线程中的 agstudy 和 josh。

Combine base and ggplot graphics in R figure window

【讨论】：