日本免费高清视频-国产福利视频导航-黄色在线播放国产-天天操天天操天天操天天操|www.shdianci.com

學(xué)無先后，達(dá)者為師

網(wǎng)站首頁(yè) 編程語(yǔ)言 正文

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

作者：Griffy650 ? 更新時(shí)間： 2022-12-06 編程語(yǔ)言

前言

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

1.基礎(chǔ)繪圖：

畫橫線： abline(h=y0)

畫豎線：abline(v=x0)

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

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

例子：(本來要上傳圖片的，但是老是上傳失敗QAQ)

m <- plot(1:10,1:10,"l")+
  abline(v=3,lwd=2,lty=2,col="brown")+    #lwd設(shè)置線的寬度，lty表示虛線，其后數(shù)字表示虛線類型
  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繪圖：

畫橫線：geom_hline(yintercept= )

畫豎線：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ǔ)言——一張圖上畫多條線

第一種：

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()

是指重新開個(gè)窗口畫圖。

總結(jié)

原文鏈接：https://blog.csdn.net/weixin_56198196/article/details/123307026

欄目分類
最近更新