参考资料：R语言实战【第2版】

1、示例一

# 绑定数据框mtcars
attach(mtcars)
  # 打开一个图形窗口并生成一个散点图
  plot(wt,mpg)
  # 添加一条最优拟合曲线
  abline(lm(mpg~wt))
  # 添加标题
  title("Regression of MPG on weight")
# 解除数据框绑定
detach(mtcars)

        要通过代码保存图形，将绘图语句加载开启目标图形设备的语句和关闭图形设备的语句之间即可，如下：

pdf("mygraph.pdf")
  attach(mtcars)
    plot(wt,mpg)
    abline(lm(mpg~wt))
    title("Regression of MPG on Weight")
  detach(mtcars)
dev.off()

        除了pdf()，还可以使用函数win.metafile()、png()、jpeg()、bmp()、tiff()、xfig()和postscript()将图形保存为其他格式。

2、示例二

# 录入数据
dose<-c(20,30,40,45,60)
drugA<-c(16,20,27,40,60)
drugB<-c(15,18,25,31,40)
# 绘制一幅描述药剂A的剂量和响应关系的图形
# dose位于x轴，drugA位于y轴
# type='b'表示同时绘制点和线
plot(dose,drugA,type='b')