生成日期时间序列

Rolle0524

想用R 生成一段时间序列，从某个日期开始，每个30天输出一个日期，比如从1850-01-16开始，下一个就是1850-02-15，然后1850-03-17........，再规定一下要生成的日期的个数（下面的例子是生成3540个日期值）

这个可以用下面的代码实现
library(zoo)

nctime<-zooreg(1:3540,frequency=1/30,start=as.Date("1850-01-16"))

nctime

write.table(nctime,file="shjian.txt",sep="",quote=FALSE,append=FALSE,na="NA")

但是现在因为需要，我想让每年的日期里面都不考虑闰年，就是每年都是365天，每个2月都是28天

也就是noleap   year（没有闰年）

应该怎么办?  

求大神指导！