如何从日期字段中获取该季度的通讯日？

Question

我有一个数据集，其中日期介于5/1/2016和5/21/2016之间。我想创建一个新变量day_quarter，它将是本季度的对应日期。 例如：

第二季的第一天是4月1日，所以5月15日将是45/91。

有什么想法吗？

Answer 1

试试这段代码：

Address <- c("#20 W Irving ST","@1 East Street",
             "%222 Rockfard Avenue","-145 W Locust","& 99 East Locus")
Number <- c("A-1","A-2","A-3","A-4","A-5")
DF <- data.frame(Address,Number)