R裁剪图表的右边框

Question

我使用chart_Series创建了一个图表，但是我想通过在R中裁剪而不是使用外部程序来删除RHS y轴标签

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轴上的标签？

谢谢你的帮助。

Answer 1

您可以使用par设置边距。

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

默认是

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

边距以行表示。 有关更多信息，请参见?par 。

---

编辑 ：似乎我误解了这个问题，但答案仍然与par ！

par(bty='c')

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

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

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

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