最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

R語(yǔ)言如何畫(huà)豎線、橫線、添加標(biāo)簽以及畫(huà)固定長(zhǎng)度的線段

 更新時(shí)間:2022年11月04日 09:42:39   作者:Griffy650  
R語(yǔ)言繪圖的能力非常強(qiáng)大,有時(shí)看似繁復(fù)的圖形不過(guò)寥寥數(shù)行代碼就搞定,下面這篇文章主要給大家介紹了關(guān)于R語(yǔ)言如何畫(huà)豎線、橫線、添加標(biāo)簽以及畫(huà)固定長(zhǎng)度的線段的相關(guān)資料,需要的朋友可以參考下

前言

注:在ggplot2中不能使用abline,segments,在基礎(chǔ)繪圖中不能使用annotate

1.基礎(chǔ)繪圖:

畫(huà)橫線: abline(h=y0)

畫(huà)豎線:abline(v=x0)

添加固定長(zhǎng)度線段:segments(x0=, y0=, x1=, y1=, ...)

添加文字標(biāo)簽:text(x=x0, y=y0, label=" ")

例子:(本來(lái)要上傳圖片的,但是老是上傳失敗QAQ)

m <- plot(1:10,1:10,"l")+
  abline(v=3,lwd=2,lty=2,col="brown")+    #lwd設(shè)置線的寬度,lty表示虛線,其后數(shù)字表示虛線類(lèi)型
  abline(h=3,lwd=2,lty=3)
m+text(x=4,y=4,label="*",col="red")+text(x=5,y=4,label="A(4,4)")
m+segments(x0=2,y0=6,x1=8,y1=6)   # y=6,x軸從2-8的線段

2.ggplot2繪圖:

畫(huà)橫線:geom_hline(yintercept= )

畫(huà)豎線:geom_vline(xintercept=)

加標(biāo)注:annotate("text",x=,y=,label="")

例子:用women數(shù)據(jù)集舉例

f <- ggplot(women,aes(height,weight))+geom_point()
f+geom_vline(xintercept = 64,lty=3,lwd=1,col="blue")+
  geom_hline(yintercept = 123)
f+annotate("text",x=60,y=150,label="*",size=5,col="red")

補(bǔ)充:R語(yǔ)言——一張圖上畫(huà)多條線

第一種:

plot(M[1:20],type="o",pch=20,col="red")
par(new = TRUE)
plot(N[1:20],type="o",pch=17,col="blue")

中間加上這一行par(new = TRUE)就好了。

第二種:

選擇用lines

plot(M[1:20],type="o",pch=20,col="red")
points(N[1:20],pch=17,col="blue")
lines(N,col="Blue",lty=2)

或者是:

plot(M[1:20],type="o",pch=20,col="red")
lines(N[1:20],pch=17,type="o",col="Blue",lty=2)

另外

dev.new()

是指重新開(kāi)個(gè)窗口畫(huà)圖。

總結(jié)

到此這篇關(guān)于R語(yǔ)言如何畫(huà)豎線、橫線、添加標(biāo)簽以及畫(huà)固定長(zhǎng)度的線段的文章就介紹到這了,更多相關(guān)R語(yǔ)言畫(huà)豎線橫線 內(nèi)容請(qǐng)搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家!

相關(guān)文章

最新評(píng)論

德令哈市| 栖霞市| 合水县| 祥云县| 务川| 晋宁县| 张家界市| 南昌市| 华安县| 张掖市| 南昌市| 洪江市| 闵行区| 孝义市| 惠东县| 资阳市| 临安市| 阜城县| 中超| 中方县| 酉阳| 鹤峰县| 清丰县| 汕尾市| 米泉市| 潜山县| 孟津县| 高平市| 湘乡市| 门源| 五大连池市| 民县| 方城县| 万年县| 荆门市| 甘洛县| 隆化县| 诸暨市| 柘城县| 南雄市| 将乐县|