1. plot() 函数中加 xlim=c(min(data),max(data)), data 是你的横坐标。
    或者使用 lines(x,y), x 是横坐标，y 是拟合值
2. 使用 text (x,y,'y=a+bx') , (x,y) 是你指定的坐标

谢谢beatuxlee的回答，我自己又找到一种新的方法，用ggplot2做出来的图默认就是在这之间的。
对于如下的数据：

    Con        As       Ai     F
1    7.8   617.762 4996.167  0.12
2   15.6   432.259 2393.950  0.18
3   31.2   816.158 2583.144  0.32
4   62.5  1633.519 2676.422  0.61
5  125.0  3339.616 2897.144  1.15
6  250.0  7059.436 2735.598  2.58
7  500.0 10999.563 2429.250  4.53
8 1000.0 25400.623 2612.266  9.72
9 2000.0 40020.742 2091.125 19.14

ggplot2的作图方法：

library(ggplot2)
qplot(Con, F, data=bq, geom=c("point","smooth"), method=lm, se=F,
         main="As/Ai~Concentration",
         xlab="Concentration (ug/mL)",
         ylab=expression(frac(As, Ai)), )

最后得到下图：


我正在寻思怎么把这张图美化一下，但是初步的雏形已经出来了。