《R语言实战》第三章 画图——学习笔记

3.1 创建并保存一个图片dev.new() # 打开一个新窗口,这样就不会覆盖掉原来的图png("regress.png") attach(df) plot(AGE, COUNTOP) # 画散点图 abline(lm(COUNTOP~AGE)) # 添加最优拟合回归线 title("Regression of COUNTOP on AGE") # 设置标题 detach(df)dev.off() # 关闭这个窗口3.2 plot函数plot(x, y, type="b")
摘要由CSDN通过智能技术生成

3.1 创建并保存一个图片

dev.new() # 打开一个新窗口,这样就不会覆盖掉原来的图
png("regress.png")
  attach(df)
  plot(AGE, COUNTOP) # 画散点图
  abline(lm(COUNTOP~AGE)) # 添加最优拟合回归线
  title("Regression of COUNTOP on AGE") # 设置标题
  detach(df)
dev.off() # 关闭这个窗口

3.2 设置图形参数

3.2.1 par()函数

opar <- par(no.readonly=TRUE)# 以生成可供修改的图形参数列表
par(lty=2, pch=17, lwd=2, cex=2, col="red") 
plot(x, y, type="b")

lty线形,pch点形,lwd线条宽度,cex点的大小, col线条颜色。
也可以直接把参数写在plot中

plot(x, y, type="b",lty=2, pch=17, lwd=2, cex=2, col="red") 

type=“b” 表示同时绘制点和线。

3.2.2 设置文本的字体、字号、字样

par(cex.axis=2, cex.lab=2, cex.main=1, cex.sub=5) 
plot(AGE, EXPENDOP, main="DRAW A PICTURE", sub="hahah", xlab="Dosage", ylab=
  • 2
    点赞
  • 12
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值