代码之家 › 专栏 › 技术社区 › unknown

使用ggplot scale_x_yearmon缺少yearmon标签

zoo graph ggplot2 r

unknown · 技术社区 · 5 年前

示例数据:

df <-  data.frame(dates = c("2019-01", "2019-02", "2018-08", "2018-09", "2018-10", "2018-11", "2018-12"), values= c(0,1,2,3,4,5,6))
df$dates <- as.yearmon(df$dates)

ggplot(df, aes(x = dates, y = values)) + 
  geom_bar(position="dodge", stat="identity") +      
  theme_light() +
  xlab('Month') +
  ylab('values')+ 
  scale_x_yearmon(format="%Y %m")

2 回复 | 直到 5 年前

G. Grothendieck 5 年前

我想 scale_x_yearmon scale_x_continuous 但我们可以打电话 比例x连续

ggplot(df, aes(x = dates, y = values)) + 
 geom_bar(position="dodge", stat="identity") +      
 theme_light() +
 xlab('Month') +
 ylab('values')+ 
 scale_x_continuous(breaks=as.numeric(df$dates), labels=format(df$dates,"%Y %m")) ##

DeduciveR 5 年前

我认为这是策划的问题 zoo Date 类并在ggplot中指定日期标签。您需要将日期添加到字符串中,以便 dates 柱然后你可以用 scale_x_date 并指定 date_labels .

library(tidyverse)
df <-  data.frame(dates = c("2019-01", "2019-02", "2018-08", "2018-09", "2018-10", "2018-11", "2018-12"), values= c(0,1,2,3,4,5,6)) %>% 
  arrange(dates) %>% 
  mutate(dates = as.Date(paste0(dates, "-01")))


ggplot(df, aes(x = dates, y = values)) + 
geom_bar(position="dodge", stat="identity") +
scale_x_date(date_breaks="1 month", date_labels="%Y %m") +
theme_light() +
xlab('Month') +
ylab('values')