2017-10-05 156 views
0

我想在R中繪製以下分段函數:f(x)= x if x < = 1/2,f(x)= x-1 if x> 1/2 。但是,我一直無法弄清楚如何去除x = 1/2處不連續點之間的連線。我的代碼如下:如何刪除R中不連續點之間的連線

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

這裏是輸出:

enter image description here

有沒有辦法只刪除連線這兩個點,但保持一切?任何幫助將不勝感激。謝謝!

+0

解決你需要做的不僅僅是繪製的兩件? 'x1 <-seq(0,1/2,1/255); fx1 <-x1; x2 <-seq(1/2,1,1/255); fx2 <-x2-1; (x1,fx1,ylim = c(-1,1),xlim = c(0,1),type ='l'); 行(x2,fx2)' – G5W

回答

2

這裏是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) 

enter image description here