使用x类别的分类时间数据的线图

Question

标题可能不是表达我尝试做的最佳方式。我试图为每本书的12个版本中的每个版本绘制数据，大约每5年（但最后两个是不同的间隔）。我希望它绘制标签版本的年份，但它绘制为5年间隔。这是数据：

x <- c(1960, 1965, 1970, 1975, 1980, 1985, 1990, 1995, 2000, 2004, 2008, 2014)
y1 <- c(43, 58, 75, 72, 76, 86, 102, 107, 112, 83, 82, 73)
y2 <- c(42, 63, 70, 74, 76, 77, 78, 78, 78, 78, 78, 78)
y3 <- c(10, 15, 17, 23, 27, 29, 34, 36, 37, 37, 37, 38)

plot(x, y1, ylim=c(0, 120), xlab="Edition", type = "b")
lines(x, y1)
lines(x, y3)

我尝试了这个，它几乎就在那里，但不是每个标签都显示出来：     plot（x，y1，ylim = c（0,120），xlab =＆＃34; Edition＆＃34;，type =＆＃34; b＆＃34;，xaxt =＆＃39; n＆＃39;）     axis（1，at = c（1960,1965,1970,1975,1980,1985,1990,1995,2000,2004,2008,2014），labels = c（＆＃34; 1960＆＃34;，＆＃34; 1965年＆＃34;，＆＃34; 1970＆＃34;，＆＃34; 1975＆＃34;，＆＃34; 1980＆＃34;，＆＃34; 1985＆＃34;，＆＃34; 1990＆＃34;， ＆＃34; 1995＆＃34;，＆＃34; 2000＆＃34;，＆＃34; 2004＆＃34;，＆＃34; 2008＆＃34;，＆＃34; 2014＆＃34;））

Answer 1

如果要在特定位置绘制轴标记，则应自行处理绘图。在这里，我们关闭默认的x轴并告诉R在哪里明确地绘制标记。

plot(x, y1, ylim=c(0, 120), xlab="Edition", type = "b", xaxt="n")
axis(1, at=x)
#lines(x, y1)
lines(x, y3)