ř裁剪图

2013-11-20 71 views 0 likes

我创建使用chart_Series图表的右手边，但我想通过R内裁剪，而不是使用一个外部程序ř裁剪图

library(quantmod) 
getSymbols("SPY", from="2013-01-01", to=Sys.Date()) 


myTheme <- chart_theme() 
myTheme$rylab <- FALSE 

chart1 <- chart_Series(SPY,theme=myTheme) 

add_TA(SMA(SPY[,4],20),on=1)

以除去RHS y轴的标签但如何可以裁剪图表以删除右手边框以及rhs y轴上的标签？

感谢您的帮助。

来源

2013-11-20 adam.888

使用旨在分割图像的外部应用程序。 R会尝试将图像放入可用空间，如果不适合，则会发出错误。也许你只是想删除空白。如果是这样，请按照nico并使用'par（mar = c（5,4,4,0）+。1）' –

我现在正在使用外部应用程序，但是我需要这么做很多次R内的解决方案将节省大量时间。 –

回答

您可以使用par来设置页边距。

par(mar=c(bottom, left, top, right))

默认为

par(mar=c(5,4,4,2)+.1)

边距中的行表示。有关更多信息，请参阅?par。

编辑：看来我误解了这个问题，但答案还是在于par！

par(bty='c')

将绘制一个“C”框（即只有顶部，左侧和底部）。的bty
其他可能的值包括：

n：无盒
7（你可以用box功能添加自定义箱）：只有顶部和右侧
l：只有底部和左侧
]：无左边框
u：无顶边框

如果需要，还可以直接将bty通过绘图，例如：

plot(x, y, bty="n")

来源

2013-11-20 20:14:34 nico

也许这就是需要的。我以不同的方式读取请求。我认为它被要求删除边界框的右侧。 –

@DWin：ahhhh ......可能你是对的。那么，我会留下答案，直到我们得到更多的信息，实际上需要什么... – nico

这是正确的，我试图删除框的右侧 –

ř裁剪图

回答

相关问题