【R实验.3】绘图

ゝ一纸荒年。 2022-10-16 14:24 136阅读 0赞

*解法并不单一，下列方法带有璇子个人的偏好，因此仅供参考。如有错误，欢迎在评论区斧正！*

> 本章实验仅为绘图操作的细节延展。个人认为就R实际应用来说，plot等简单命令就足够了（专门绘图除外）。所以在R入门或基础阶段的朋友可忽略本章实验，以避免让自己陷入命令围城中。

3.1假设用命令curve(cos(x))画了一个图，哪一个R 命令能将该图像保存为文件名是myplot.pdf的pdf 文件？

#保存为pdf
    pdf(file='myplot.pdf')
    curve(cos(x))
    dev.off() #关闭设备

![在这里插入图片描述][20210530221125513.png]  
![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70]  
3.2 函数layout()的作用是什么？

> 官网解释：  
> layout divides the device up into as many rows and columns as there are in matrix mat, with the column-widths and the row-heights specified in the respective arguments.

简单来说，就是将画图框划分成指定的几个区域，相较于par(mfrow=…)的均分有更强的灵活性。

eg：
    > #区域分割
    > def.par <- par(no.readonly = T)#储存当前图形设备设置
    > layout(matrix(c(1,1,2,2),2,2,byrow = F))
    > layout.show(2)#从当前位置后开始画图
    > plot(10:1)
    > plot(3:5)
    > par(def.par)#恢复默认设置

![在这里插入图片描述][20210530221455890.png]  
![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 1]  
3.3 对函数plot()的哪一个参变量进行设置可得到以破折号间隔的点图？

> plot(sin(c(1:8)),type='b')

![在这里插入图片描述][20210530221723723.png]  
3.4 使用哪一个函数来给图形添加文本？

使用text来为图形添加文本

Eg:
    > #绘图参数
    > plot(rep(1,10),ylim=c(-2,1.2),pch=1:10,cex=3,axes=T,xlab="",ylab="")
    > #十个图形，纵坐标同，在一水平线上
    > text(rep(0.6,10),as.character(1:10))
    > #标注文字

![在这里插入图片描述][20210530221854962.png]  
3.5 函数par()的哪一个参变量可用来指定函数curve()绘制出的曲线的线型？

lty 控制连线的线型, 可以是整数(1: 实线，2: 虚线，3: 点线， 4: 点虚线, 5: 长虚线，6: 双虚线), 或者是不超过8 个字符的字符串(字符为从"0"到"9"之间的数字)交替地指定线和空臼的长度，单位为磅(points)或象素，例如lty="44"和lty=2 效果相同

eg:
    x <- -0:1
    par(curve(sin(x)),lty=2)

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 2]  
3.6 函数par()的哪一个参变量可用来以其他的符号代替散点图中默认的小圆圈？

Pch=1时生成的符号可以代替散点图中默认的小圆圈（可参见3.4中的例子），当然也可以用其他符号

Eg:
    > par(pch='&')
    > plot(c(1:6))

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 3]  
3.7 哪一个参变量可用来管理图形中的颜色？

bg 指定背景色(例如bg=“red”, bg=“blue”; 用colors()可以显示657 种可用的颜色名)  
col 控制符号的颜色; 和cex 类似, 还可用：col.axis, col.lab, col.main, col.sub

3.8 哪一个命令可以为一个已有的图形添加一个散点图？

Points(x,y)  
\#为便于说明，用pch=4的符号表示后添加的点

> plot(1:5, 1:5, xlim = c(0,6), ylim = c (0,6), type = "n")         #type=n，空白
    > plot(sin(1:5))
    > points(x = c(2, 2), y = c(-0.5, 0.5),col='red',pch=4)

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 4]

[20210530221125513.png]: /images/20221014/0d057c0d1cde48c7be908b172d2a7b51.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70]: /images/20221014/786c6835390a4c37b8f5103ab75a064c.png
[20210530221455890.png]: /images/20221014/41ccda825fa14984ad32115182a51592.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 1]: /images/20221014/12b68d6471be45b1a21a8dc04bd8d988.png
[20210530221723723.png]: /images/20221014/752347ad787449e28514e46ddd31c176.png
[20210530221854962.png]: /images/20221014/d828b56bd78e4c1a9886dc59e015b368.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 2]: /images/20221014/724bf96de75b4220b232b46a29d97f73.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 3]: /images/20221014/980eaf214c48450ab9949cbc51f84fb9.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQ1MDYwNjc0_size_16_color_FFFFFF_t_70 4]: /images/20221014/e320af29730a4e5b984ee006b5cf2cef.png