本站分享:大数据、数据分析师考试认证培训,包括:Python培训Excel培训Matlab培训SPSS培训SAS培训R语言培训Hadoop培训Amos培训Stata培训Eviews培训广告位

如何用R画折线图,散点图,平滑曲线图

r语言 cdadata 1261℃


如何用
R画折线图,散点图,平滑曲线图

关键词: 折线图改成平滑曲线图带平滑线的散点图
例子:

week

1

2

3

4

5

6

x

3

8

19

24

6

1

y

1

25

21

3

2

1


要求是以
week为横坐标,画出x-weeky-week的折线图,散点图及平滑曲线图。

一.散点图

## 输入数据 ##

> week<-c(1,2,3,4,5,6)

> x<-c(3,8,19,24,6,1)

> y<-c(1,25,21,3,2,1)

##

x-week散点图
##

> plot(week,x,col=”red”,pch=22,bg=”yellow”,xlim=c(0,6),ylim=c(0,30),lwd=2,xlab=”WEEK”,ylab=”STUDENT”,main=”lesson”,sub=”class”,col.main=”green”,font.main=2,asp=0,cex=1.2);

## 结果如下 ##

##

注释
##

col
颜色

pch symbol
属性
1-25

 如何用R画折线图,散点图,平滑曲线图

xlimylim为坐标刻度范围

xlabylab为坐标标题

lwd
line width for drawing symbols

main
为图标题

sub
为图下标题

col.main
为设置图标题颜色

font.main
为设置图标题字体

cel
symble

大小

lty

为折线类型
1为实线,
2为虚线


二、折线图

##

折线图只需在
plot函数中加入type=“
” ##

> plot(week,x,col=”red”,pch=22,bg=”yellow”,xlim=c(0,6),ylim=c(0,30),lwd=2,xlab=”WEEK”,ylab=”STUDENT”,main=”lesson”,sub=”class”,col.main=”green”,font.main=2,asp=0,cex=1.2,type=”b”,lty=1)

type

what type of plot should be drawn. Possible types
are

·        
“p” for points,

·        
“l” for lines,

·        
“b” for both,

·        
“c” for the lines part alone
of 
“b”,

·        
“o” for both ‘overplotted’,

·        
“h” for ‘histogram’ like (or
‘high-density’) vertical lines,

·        
“s” for
stair steps,

·        
“S” for other steps,
see ‘Details’ below,

·        
“n” for no plotting.

 

##

添加一条线

使用函数
lines()##

>lines(week,y,col=”green”,pch=16,bg=”yellow”,xlim=c(0,6),ylim=c(0,30),lwd=2,xlab=”WEEK”,ylab=”STUDENT”,main=”lesson”,sub=”class”,col.main=”green”,font.main=2,asp=0,cex=1.2,type=”b”,lty=2)

##

对图添加栅格

使用
grid()函数
##

grid(nx=6,ny=6,lwd=2)


如果只需横轴上有栅格,则
ny=NA

##

如何在图中添加一条直线

abline()

函数
##

>
abline(h=18,col=”black”,lty=1,lwd=2)

如何用R画折线图,散点图,平滑曲线图

##

如何添加图例

legend()

函数
##

>legend(“topright”,legend=c(“x”,”y”),pch=c(22,16),col=c(“red”,”green”),lwd=2,lty=c(1,2))

 


当然
topright

还可以用坐标位置代替(
xy



平滑曲线图

##

使用函数
spline(x,y,n=?)
##

> sp=spline(week,x,n=1000)

> sp1=spline(week,y,n=1000)

n值表示平滑程度

>
plot(sp,col=”red”,type=”l”,xlim=c(0,6),ylim=c(0,30),lwd=2,xlab=”WEEK”,ylab=”STUDENT”,main=”lesson”,sub=”class”,col.main=”green”,font.main=2)

>
lines(sp1,col=”green”,type=”l”,xlim=c(0,6),ylim=c(0,30),lwd=2,xlab=”WEEK”,ylab=”STUDENT”,main=”lesson”,sub=”class”,col.main=”green”,font.main=2)

>
legend(“topright”,legend=c(“x”,”y”),col=c(“red”,”green”),lwd=2,lty=c(1,2))

转载请注明:数据分析 » 如何用R画折线图,散点图,平滑曲线图

喜欢 (2)or分享 (0)