自动将日期递增到r中的向量

Question

嗨，这是一个两部分问题。

1. 如何为日期创建自动递增数据框？

   我想自动创建一个数据框，其中列为＆＃34; date＆＃34;从2011-05-01（2011年5月1日）到今天（2015-12-01）每隔一个月间隔一次。

输出：

  S.no.   Date
    1       2011-05-01
    2       2011-06-01
    3       2011-07-01
    .       .
    55      2015-12-01

1. 其次，我有一个数据框，其中包含客户名称及其到期日期，例如：

   names<-c("Tom","David")
   expiryDate<-as.Date(c("2011-05-22","2011-06-19"))
   df<-data.frame(names,expiryDate)
   df
   Name    Expirydate
   Tom     2011-05-22
   David   2011-06-19
   

我想处理到期日以检查客户是否在该月有效。

Name          2011-05-01       2011-06-01     2011-07-01 ... (till 2015-12-01)
Tom           TRUE             FALSE             FALSE
David         TRUE             TRUE              FALSE