R - 使用 CSV 数据的自定义 X 轴

Question

我正在使用 RStudio，并且有一个关于自定义 x 轴的问题。在我当前的项目中，我想在 X 轴上绘制日期，在 Y 轴上绘制此特定操作的评分。

tree <- read.csv(file="D:/R_Work/average_grade.csv",head=TRUE,sep=",")

plot(tree$NUM,tree$AVG,
     main="YSLOW Grades",
     xlab="Date",
     ylab="Grade",
     xaxt="n",
     yaxt="n",
     ylim = c(5,0))


axis(1, at = seq(tree$DATE), las=2)
axis(2, at=1:5, labels=LETTERS[1:5])

正如您从我的代码中看到的那样，我正在尝试做的是绘制 NUM vs AVG，NUM 是分配给操作的数字。但是，我希望 NUM 在我的实际图形 x 轴上显示为 DATE。因此，它将显示相应的日期，而不是数字。我试图用我的倒数第二行代码来做到这一点，但它对我不起作用（不足为奇，只是在测试任何东西）。 DATE 与包含 7.10.14 等数据的 CSV 文件相关联。

我之所以不简单地绘制 DATE 与 AVG 的原因是，当我绘制日期时，会垂直于我的数据点绘制奇怪的水平线。我认为有一个简单的解决方法，但我自己无法解决。

图表（带有奇怪的线条）：

如果有人知道如何编辑我的 x 轴以与我的 CSV 数据点重合，或者如何删除这些线，以便我可以轻松地绘制一个日期，就像图像显示的那样，那就太好了。

谢谢！

数据：

DATE、AVG、NUM

7.13.14,2,1

7.14.9,2,2

7.15.10,2,3

Answer 1

这会帮助你到达你想去的地方吗？

tree <- "DATE,AVG,NUM
7.13.14,2,1
7.14.9,2,2
7.16.10,2,3"

tree <- read.csv(textConnection(tree),
              stringsAsFactors=FALSE)

tree$DATE_NEW <- as.POSIXct(paste0("2015.", tree$DATE),
                         format = "%Y.%m.%d.%H")

plot(as.numeric(factor(tree$DATE_NEW)),
     tree$AVG,
     main="YSLOW Grades",
     xlab="Date",
     ylab="Grade",
     xaxt="n",
     yaxt="n",
     ylim = c(5,0))

axis(1, at = factor(tree$DATE_NEW), 
     labels = format(tree$DATE_NEW,
                     format = "%b %d %H:%S"))
axis(2, at=1:5, labels=LETTERS[1:5])

编辑：

最大的变化是我正在绘制as.numeric(factor(tree$DATE_NEW))。当你在 x 轴上绘制一个因子时，R 默认会尝试绘制一个箱线图。由于每个因子组只有一个观察值，因此您会看到一条线（四分位数和中位数都相同）。

为了得到您想要的图，我们需要做的是绘制因子的基础数值。这有点难看，但现在点都均匀分布（忽略它们之间经过的时间）并且仍然显示点而不是线。