画图与图例：
legend(x, y = NULL, legend, fill = NULL, col = par("col"),
border = "black", lty, lwd, pch,
angle = 45, density = NULL, bty = "o", bg = par("bg"),
box.lwd = par("lwd"), box.lty = par("lty"), box.col = par("fg"),
pt.bg = NA, cex = 1, pt.cex = cex, pt.lwd = lwd,
xjust = 0, yjust = 1, x.intersp = 1, y.intersp = 1,
adj = c(0, 0.5), text.width = NULL, text.col = par("col"),
text.font = NULL, merge = do.lines && has.pch, trace = FALSE,
plot = TRUE, ncol = 1, horiz = FALSE, title = NULL,
inset = 0, xpd, title.col = text.col, title.adj = 0.5,
seg.len = 2)
|
x, y |
X,y用于定位图例，也可用单键词"bottomright", "bottom", "bottomleft", "left", "topleft", "top", "topright", "right" and "center" |
|
legend |
字符或表达式向量 |
|
fill |
用特定的颜色进行填充 |
|
col |
图例中出现的点或线的颜色 |
|
border |
当fill = 参数存在的情况下，填充色的边框 |
|
lty, lwd |
图例中线的类型与宽度 |
|
pch |
点的类型 |
|
angle |
阴影的角度 |
|
density |
阴影线的密度 |
|
bty |
图例框是否画出，o为画出，默认为n不画出 |
|
bg |
bty != "n"时，图例的背景色 |
|
box.lty, box.lwd, box.col |
bty = "o"时，图例框的类型，box.lty决定是否为虚线，box.lwd决定粗线，box.col决定颜色 |
|
pt.bg |
点的背景色 |
|
cex |
字符大小 |
|
pt.cex |
点的大小 |
|
pt.lwd |
点的边缘的线宽 |
|
x.intersp |
图例中文字离图片的水平距离 |
|
y.intersp |
图例中文字离图片的垂直距离 |
|
adj |
图例中字体的相对位置 |
|
text.width |
图例字体所占的宽度 |
|
text.col |
图例字体的颜色 |
|
text.font |
图例字体 |
|
merge |
logical, if TRUE，合并点与线，但不填充图例框，默认为TRUE |
|
trace |
logical; if TRUE显示图例信息. |
|
plot |
logical. If FALSE不画出图例 |
|
ncol |
图例中分类的列数 |
|
horiz |
logical; if TRUE,水平放置图例 |
|
title |
给图例加标题 |
|
inset |
当图例用关键词设置位置后，inset = 分数，可以设置其相对位置 |
|
xpd |
xpd=FALSE，即不允许在作图区域外作图，改为TRUE即可，与par()参数配合使用。 |
|
title.col |
标题颜色 |
|
title.adj |
图例标题的相对位置，0.5为默认，在中间。0最左，1为最右。 |
|
seg.len |
lty 与lwd的线长，长度单位为字符宽度 |
先画出每个样本的forehead位置的sweat gland 数量
|
1
|
plot(forehead~sample,pch=15,col="DarkTurquoise",ylim=c(0,400),ylab="Number of active sweat glands per cm2",main="Number of active sweat glands per cm2 in forehead, forearm and back")#pch表示散点用什么形状表示，col表示颜色，ylim表示Y轴范围，ylab表示Y轴标题，main表示图片标题
|
接着画出每个样本forearm位置的sweat gland 数量
注意，这里不用plot函数画forearm和sample之间的关系，因为会把上面forehead和sample的图覆盖住，为了实现多个因变量和一个自变量在同一个图片里，我们要用points或者lines函数画其他因变量和自变量的值
|
1
|
points(sample,forearm,pch=16,col="DeepPink",cex=1)#cex表示散点的大小
|
画出back位置的sweat gland 数量
|
1
|
points(sample,back,pch=17,col="RosyBrown",cex=1)
|
把14个样本在forehead，forearm和back不同位置的sweat gland 数量用线连起来
|
1
2
3
|
lines(forehead,col="DarkTurquoise",lty=1)#lty=1表示用实线连起来
lines(forearm,col="DeepPink",lty=2)#lty=2表示用虚线连起来
lines(back,col="RosyBrown",lty=3)#lty=3表示用点线连起来
|
legend函数，图例说明：
|
1
|
legend(12,400,c("forehead","forearm","back"),col=c("DarkTurquoise","DeepPink","RosyBrown"),text.col=c("DarkTurquoise","DeepPink","RosyBrown"),pch=c(15,16,17),lty=c(1,2,3))#12表示x轴坐标为12,400表示y轴坐标为400，意思为图例的左边和上边界限，text.col表示图例文本颜色
|
最后，画出来的图片效果如下：
