散点图的话我觉得
plot(X[,2]);#假设你那组数据是X
就行了啊
坐标轴命名的话plot函数里有xlab和ylab两个参数，修改这两个就行了
不过我觉得应该是画时间序列图吧？
如果是画时间序列图的话利用plot.ts()函数，
如果不加美化的可以使用下面这段代码：
X <-read.table("f://airpass.txt");
z <- ts(matrix(X[,2], 18, 1),
        start = c(1949, 1), frequency = 12);
plot.ts(z);
希望对你有用。

plot(dat$V2~dat$V1,xlab="xxx",ylab="yyy")