如何在x軸上顯示標簽？

Question

這是我的.csv文件：

dateval,links
18/03/2013,100
19/03/2013,200
20/03/2013,300
21/03/2013,400
22/03/2013,500

該文件被讀入一個名為date1的對象，這是我用來繪制數據圖形的代碼：

g_range <- range(0, date1$links)
plot(date1$links, type="o", col="blue", ylim=g_range,
    axes=FALSE, ann=FALSE)
axis(1, xlab=date1$links)
box()
title(main="Additions", col.main="red", font.main=4)
axis(2, las=1, at=50*0:g_range[2])
title(xlab="Date", col.lab=rgb(0,0.5,0))
title(ylab="# Links", col.lab=rgb(0,0.5,0))

這是生成的圖：

不輸出日期值，而是顯示數字1-5。 如何修改代碼，以便生成.csv文件中包含的日期值？ 我認為問題出在這條線： axis(1, xlab=date1$links)嗎？

Answer 1

嘗試以下方法：

axis(1,at=1:5,labels = date1$dateval)

因此，您會注意到，如果仔細看一下?axis您會發現根本沒有xlab參數，但是第二和第三個參數是：

在 -點處勾號標記將被繪制。 省略非限定（無限，NaN或NA）值。 默認情況下（當為NULL時）會計算刻度線位置，請參見下面的“詳細信息”。

標簽 -這可以是一個邏輯值，用於指定是在刻度線處進行（數字）注釋，還是可以在刻度點處放置標簽的字符或表達式矢量。 （其他對象由as.graphicsAnnot強制。）如果這不符合邏輯，則還應提供at，並且長度相同。 如果標簽在強制后的長度為零，則其效果與提供TRUE相同。

但實際上也許您應該做更多這樣的事情：

date1$dateval <- as.Date(date1$dateval,format = "%d/%m/%Y")
plot(date1$dateval,date1$links, type="o", col="blue", ylim=g_range, ann=FALSE,axes = FALSE)
axis(1,at=date1$dateval,labels = date1$dateval)

但是，與使用專門為此目的設計的軟件包/功能相比，即使那樣，這也是處理繪圖日期的一種粗略方法。