0

我正在尝试更改上述图表中的一些参数。具体来说，我想做以下事情：

  1. 使轴标签和 ylab 更小
  2. 删除标题并为图表腾出空间
  3. 水平对齐 ylabels 而不是垂直对齐

我的代码如下所示

opar <- par(oma = c(0.1,0.2,0,0.1))
par(mar=c(0,0,0,0),plt=c(0,0.1,0,0.1),mgp=c(3,0.5,0),pin=c(1,1),fin=c(0.2,0.2),
  las=1,mex=0.5,cex.main=0.6,cex.lab=0.3,cex.axis=0.3)
chart.CumReturns(returns_ts,geometric=TRUE,wealth.index=TRUE,main="",xlab="",col=hblue,cex.axis=0.8,cex.lab=0.6,las=1)
par(xpd=NA)
legend(legend=paste(paste(c("Performance indexiert"),strats[i])),cex=0.7, col=hblue,lty=1, lwd=2, bty="n", 
text.col="black", ncol=1, "bottom", inset = c(0.0, -.20))
text_note=c(paste("Quelle: Bloomberg,", "letzter Datenpunkt:", last(data$date)))
mtext(text_note ,cex=0.4,col=hgrey,side = 1, line = 4, outer = FALSE,padj=0,adj=1)                                                                                                                                      #ensures that the text is shown at the                                                                                                                                                                                                                 
grid.raster(pic,x=c(0.05),y=c(0.02),width=0.05,height=0.03)

然而，什么都没有发生，即没有任何参数被改变。我也试过

main=NULL

然后，出现时间序列的名称。

你能帮我吗？

问候安德烈亚斯

4

1 回答 1

0

修订版 3241 修复了底层chart.TimeSeries函数中的错误；它一直在传递cex.main并cex.lab错误地进入title函数。感谢您指出了这一点。如果你想从那里加载开发代码，它就在 r-forge 上。

更一般地说，这些图表使用得不是par很好。具体来说，直接使用更改图表属性是par()行不通的。我意识到这不太对，几年来我一直想修复它，但总有其他事情要做……

所以传入你想要的属性的最好方法是直接通过函数。如果您想摆脱标题，请使用main="". 通过las也是最近的修复，所以它对我有用。这是一个可重现的示例：

library(PerformanceAnalytics)
data(managers)
par(mar=c(1,4,4,2)) # c(bottom, left, top, right)
chart.CumReturns(managers[,1:3],geometric=TRUE,wealth.index=TRUE,main="",xlab="",col=bluefocus,cex.axis=0.8,cex.lab=0.6,las=1)
par(xpd=NA)
legend(legend=paste(paste(c("Performance indexiert"),"1")),cex=0.7, col=bluefocus,lty=1, lwd=2, bty="n", 
text.col="black", ncol=1, "bottom", inset = c(0.0, -.20))
text_note=c(paste("Quelle: Bloomberg,", "letzter Datenpunkt:", "last(data$date)"))
mtext(text_note ,cex=0.4,col="grey",side = 1, line = 4, outer = FALSE,padj=0,adj=1)

通过修订，这应该按您期望的方式工作。很抱歉给您带来麻烦，如果您发现任何其他问题，请告诉我。

pcc

于 2013-10-30T22:21:49.370 回答