carl大已经回答的满完美的
不过有一个函数，我推荐你试试看
full_seq + unnest的应用：
library(dplyr)
library(tidyr)
DF <- data.frame(Group = c("A", "A", "B", "B", "C", "C"),
Status = rep(c("Start", "End"), times = 3),
Date = as.Date(c("2016/01/01", "2016/01/15",
"2016/01/09", "2016/02/01",
"2016/01/02", "2016/01/07")))
DF %>% group_by(Group) %>%
summarise(Date2 = list(full_seq(Date, 1))) %>%
unnest
※ 引述《menghsuanliu (库库少)》之铭言：
: [问题类型]:
: 程式咨询(我想用R 做某件事情，但是我不知道要怎么用R 写出
: [软件熟悉度]:
: 入门(写过其他程式，只是对语法不熟悉)
: [问题叙述]:
: 我想依group,把日期补足(参考附图)
: http://i.imgur.com/ef6uHfT.jpg
: http://i.imgur.com/UasIAhm.jpg
: [程式范例]:
: [环境叙述]:
: [关键字]:
: