该图显示了r中从和截止日期范围的数据

问题描述

我有以下购买和投资期限数据。

investment <- as.character(c("First","Second","Third"))
from <- as.Date(c("2019-11-01","2020-02-25","2020-06-10"))
to <- as.Date(c("2020-08-31","2021-02-24","2020-08-09"))
amount <- as.numeric(c(20000,15000,17000))
df <- data.frame(investment,from,to,amount)

我想使用在 X轴上带有日期的水平条,最小值是数据集中最早的日期,即“ 2019-11-01”,最大值是最后日期“ 2021-02-24”。 Y轴上的投资,即第一,第二和第三。

在所示日期之间(从开始日期到结束日期),每个投资应出现水平条,以在X轴上显示涵盖不同时期的不同投资。

鼠标悬停应将金额显示标签。 X或Y轴上的金额均不相关。

解决方法

您可以使用geom_linerange()中的ggplot2

library(ggplot2)
ggplot(df) + 
  geom_linerange(aes(y = investment,xmin = from,xmax = to ),size = 18,color = "orange") +
  xlab("date")

enter image description here