R基本绘图系统：用用户定义的轴替换默认轴而不重叠

Question

我有以下代码使用基本绘图系统生成折线图，并使用三个工作日（星期二，星期五和星期六）的向量重置x轴值：

plot(data$obsn, data$Global_active_power, type = "l")
axis(1, at = c(0, mean(data$obsn), max(data$obsn)),
     labels = c("Thu", "Fri", "Sat"))

我期望第二行替换x轴默认值，但相反，新的x轴值与之前的值重叠，我一团糟。

如何用新的x替代默认的x轴值，而不是将它们重叠？

Answer 1

data = data.frame(obsn=0:2, Global_active_power=runif(3))  # Sample data

plot(data$obsn, data$Global_active_power, type = "l", axes=FALSE)  # No axis

axis(1, at = c(0, mean(data$obsn), max(data$obsn)),  # Adds x axis
     labels = c("Thu", "Fri", "Sat"))
axis(2)  # Adds y axis

有关更多详细信息，请参见?axis。 This指南也可能有帮助。