R语言——绘制甘特图

最新推荐文章于 2023-09-07 22:54:33 发布

Mr_Fengyy

最新推荐文章于 2023-09-07 22:54:33 发布

阅读量2.1k

点赞数

本文链接：https://blog.youkuaiyun.com/weixin_41030360/article/details/80891742

版权

本文介绍了如何使用R语言来绘制甘特图，通过示例代码展示了R语言在图表制作方面的灵活性。

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

今天，在群里看见有人问R能不能绘制甘特图，觉得很有意思，就动手试了一下，虽说很丑，但也说明R几乎无所不能。

代码如下：

GanttChart <- function(program,startdate,enddate,title = NA)
{
  startdate <- as.Date(startdate)
  enddate <- as.Date(enddate)
  if(sum(startdate > enddate) > 0)
  {
    stop('error:start date is later than end date.')
  }
  progrm <- length(program):1
  plot(NA,NA,
       xlim = c(min(startdate),max(enddate)),
       ylim = range(progrm),
       xlab = '日期',
       ylab = '项目',
       xaxt = 'n',
       yaxt = 'n',
       main = title)
  startUnionEnd <-