Question

我的R语言不太好，需要一些帮助。

我的ggplot有很多日期（在x轴上），因此您实际上看不到日期，因此我想将其更改为几个月以更好地了解图表。

例如，链接中的类似内容： Display the x-axis on ggplot as month only in R

这是我正在使用的脚本：

r <- read.csv("xxdive.csv", header = T, sep = ";")
names(r) <- c("Date", "Number")
r <- data.frame(r)
r$Date <- factor(r$Date, ordered = T)

r[1:2, ]
Date         Number
16.02.2015   97
17.02.2015   47

library(tidyverse)

ggplot(r, aes(Date, Number)) + 
  theme_light() + 
  ggtitle("16.02.15-10.02.16") + 
  ylab("Dives") + 
  geom_line(aes(group = 1), color = "blue")

这显示了我拥有什么样的数据。

我尝试过使用刻度尺等，但无法使其工作.. 我希望这是可以理解的，并且有人可以帮助我！：）

Answer 1

我会将Date列转换为Date类型的数据

r$Date <- as.Date(r$Date, "%d.%m.%Y");

而不是将其转换为数据类型因子。

r$Date <- factor(r$Date, ordered = T);

Answer 2

如果没有有效的示例，这会有些棘手，但是请尝试一下。

install.packages("tidyverse")
library(tidyverse)
r <- read_delim("xxdive.csv", ";", col_types = list(col_date(), col_integer()))
names(r) <- c("Date", "Number")
ggplot(r, aes(Date, Number)) + 
    geom_line(aes(group = 1), color = "blue") +
    scale_x_date(date_breaks = "1 month") +
    ylab("Dives") +     
    ggtitle("16.02.15-10.02.16") + 
    theme_light()

更改ggplot中的x轴名称

2 个答案: