R Grid.Table Plots彼此重叠

时间:2014-03-18 17:32:30

标签: r quantmod gridextra performanceanalytics

几天前刚刚开始学习R(以及本网站的新用户)并且能够通过搜索这个网站/谷歌来解决问题,但这个问题真的让我感到困惑。

背景:我正在绘制从data.frame到PerformanceAnalytics chart.CumReturns和另一个data.frame到gridExtra grid.table的返回。我正在尝试使用mfrow = c(2,1)排列它们并且chart.CumReturns图表正确排列,但gridExtra grid.table仍然在中心绘图,与其他图表重叠。代码(我可以发布的)和图表的图片如下。一直在寻找几个小时的分辨率,尝试grid.arrange,但是在这个问题上空洞......任何帮助都表示赞赏。

**抱歉,无法发布图片。想象一下绘图区域顶部的performanceanalytics图表,其中gridextra表格在中心重叠。

部分代码(意识到这个问题不是优化代码,只是现在尝试学习基础知识):

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)

1 个答案:

答案 0 :(得分:0)

男人,神话,传说......在下面的问题的帮助下,“Bo-Finger”解决了这个问题。感谢那个帖子中的agstudy和josh。

Combine base and ggplot graphics in R figure window