如何删除R中不连续点之间的界限

Question

我想在R中绘制以下分段函数：f（x）= x如果x <= 1/2，f（x）= x-1，如果x> 1/2。但是，我还没有弄清楚如何去除连接x = 1/2的不连续点之间的两点的线。我的代码如下：

x<-seq(0,1,1/255)
fx<-ifelse(x<=1/2,x,x-1)
plot(x,fx,ylim=c(-1,1),type='l')

这是输出：

有没有办法只删除连接这两个点的线，但保留其他所有内容？任何帮助将不胜感激。谢谢！

Answer 1

以下是curve

的解决方案

plot(1, ylim=c(-1,1), xlim = c(0, 1), type = "n")
curve(x + 0, from = 0, to = 1/2, add = TRUE)
curve(x - 1, from = 1/2, to = 1, add = TRUE)