Matplot R手动标记x轴答案

【问题标题】：Matplot R manually labelling x-axisMatplot R手动标记x轴
【发布时间】：2021-05-07 16:13:01
【问题描述】：

我在标记 matplot x 轴行时遇到问题。所以我有 1388 个实例，但我希望我的 X 轴以日期序列的形式自定义标签。我的 R 代码如下所示：

Dates <- seq(as.Date("2004/01/29"), as.Date("2009/07/31"), by = "quarter")

matplot(seq(1388), t(Alldata[1, ]), type = "l", 
    lwd = 1, lty = 1, col = 1:10, xlab = "Dates", ylab = "Strike", 
    main = paste("TEST"), xaxt='n')
axis(side = 1:23, at=1, labels = paste(Dates, 1:23))

谁能帮我把日期放到 x 轴上？我尝试过使用与此相同的方法：Change axis labels with matplot in R 但它不起作用。 AllData 来自一个 excel 文件，其中第一个行数如下所示：

【问题讨论】：

(object 'Alldata' not found ... 你能让这个问题重现吗？)
什么是 Alldata？
是的，抱歉，Alldata 是从一个包含 1388 个实例的 Excel 文件中加载的，我已经截取了第一行的屏幕截图

标签： r axis-labels

【解决方案1】：

我认为您混淆了函数axis 的工作方式。在下面回答时，我将生成一个随机矩阵来替换您无法访问的 Alldata

Alldata <- t(as.matrix(rnorm(23)))

我们可以再次生成情节：

matplot(seq(23),  Alldata[1, ], type = "l", 
        lwd = 1, lty = 1, col = 1:10, xlab = "Dates", 
        ylab = "Strike", main = paste("TEST"), xaxt='n')

现在，了解axis 的参数是什么很重要。第一的 side 这实际上是绘制绘图的矩形的一侧。是数字1、2、3、4之一，分别对应bottom、left、top、right。

您希望轴位于底部，因此我们将其设置为 1。

接下来，at 参数是用于绘制刻度线的位置。因此，如果您的线上有 10 个点，并且将此值设置为 1:10，它将在轴上的每个点处绘制一个刻度线。如果将其设置为 c(2,4,6,8,10)，它将在轴上每隔一个点绘制一个标记。在您的情况下，您已将其设置为 1，这将只绘制一个刻度。虽然由于 side 设置为 1:23，但没有出现。

labels 这个参数将标记绘制的刻度。理想情况下，它应该是一个与at 值长度相同的向量。您可以通过创建索引变量并将其用作at 变量并为标签编制索引来确保它们的长度相同。

这让我们：

index <- c(1,7,14,21)
axis(side = 1, at = index, labels = paste(Dates, 1:23)[index])

我认为拥有完整的日期范围会显得混乱。但是您可以删除索引并根据需要选择以下索引：

axis(side = 1, at = 1:23, labels = paste(Dates, 1:23))

【讨论】：