R-plotly|交互式甘特图（Gantt chart）-项目管理/学习计划

最新推荐文章于 2024-09-25 09:11:19 发布

生信补给站

最新推荐文章于 2024-09-25 09:11:19 发布

阅读量963

点赞数

分类专栏：可视化 R 甘特图文章标签：甘特图 R plotly 可视化

本文链接：https://blog.youkuaiyun.com/weixin_39556044/article/details/102673066

版权

本文介绍了如何使用R语言的Plotly包创建交互式的甘特图，适用于项目管理和学习计划的可视化。通过加载函数包，准备包含任务、开始时间和持续时间的数据，然后更改Layout信息，可以生成并保存html链接以便随时查看。文章还提到了其他相关的R语言绘图教程。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

本文首发于“生信补给站”微信公众号，https://mp.weixin.qq.com/s/CGz51qOjFSJ4Wx_qOMzjiw
更多关于R语言，ggplot2绘图，生信分析的内容，敬请关注小号。

甘特图（Gantt chart），又常被称为横道图或者条状图，是现代企业项目管理领域运用最为广泛的一种图示。就是通过条形来显示项目的进度、时间安排等相关情况的。

项目管理外，也可以用来管理学习计划。绘制甘特图的工具有很多，本文介绍使用R-plotly包绘制交互式的甘特图，保存html链接后，即可随时查看。

一准备数据

加载函数包，读入数据

library(plotly)
# Read in data
df <- read.csv("GanttChart.csv", stringsAsFactors = F)
# Convert to dates
df$Start <- as.Date(df$Start, format = "%m/%d/%Y")
head(df,3)

二绘制甘特图

数据如上所示，只需任务或者项目内容Task，开始时间Start，持续的时间数据即可绘制甘特图。

# 根据Resource 设置甘特图的颜色
cols <- RColorBrewer::brewer.pal(length(unique(df$Resource)), name = "Set3")
df$color <- factor(df$Resource, labels = cols)

# 初始一个空对象
p <- plot_ly()

# 每个task一个line plot，起始时间和任务持续时长
for(i in 1:(nrow(df) - 1)){
  p <- add_trace(p,
                 x = c(df$Start[i], df$Start[i] + df$Duration[i]),  #起试和终止
                 y = c(i, i),  #
                 mode = "lines",
                 line = list(color = df$color[i], width = 20), #设置line plot的颜色和线宽
                 showlegend = F,
                 hoverinfo = "text", #悬浮信息为text信息
                 #设置text显示内容
                 text = paste("Task: ", df$Tas