r图中的方形函数绘制

Question

我想在here中的这个情节（黑线）中绘制一个方形函数：

我怎样才能在R中做到这一点？

Answer 1

您可以使用方波的定义 - 在周期函数上使用符号函数：

plot(function(x) sign(sin(x)),-10,10,n=1000)

Answer 2

您可以使用lines通过指定x和y坐标的矢量来绘制任意图案。

plot(NA, xlim=c(0,10), ylim=c(-2,2))
lines(rep(0:11,each=2),rep(c(-1,1,1,-1),6))

如果您想要绘制多个内容，那将非常有用。但是，您也可以使用plot.default参数直接在type='s'中获得相同的结果：

plot(rep(0:11,each=2),rep(c(-1,1,1,-1),6), xlim=c(0,10), ylim=c(-2,2), type='s')