plot与legend画图与图例

画图与图例：

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表示图例文本颜色

最后，画出来的图片效果如下：