0

我的数据集包括全年不同阶段的各种观察结果。

  • year采集样本时。
  • site测量位置
  • Class测量 r 期间的物理阶段
  • date测量日期
  • Julian朱利安日期

最后的测量通常发生在新年的早期,也就是南半球的夏季。(例如夏天是冬天,春天是秋天)。

year site Class date Julian 1 2009 10C Early 2008-09-15 259 2 2009 10C L2 2008-09-29 273 3 2009 10C L3 2008-12-15 350 4 2010 10C Early 2009-08-31 243 5 2010 10C L2 2009-09-14 257 6 2010 10C L3 2009-12-11 345 7 2012 10C Early 2011-08-23 235 8 2012 10C L2 2011-09-22 265 9 2012 10C L3 2011-12-03 337 10 2012 10C LSample 2012-03-26 86 11 2013 10C Early 2012-09-07 251 12 2013 10C L2 2012-09-30 274 13 2013 10C L3 2012-12-17 352 14 2014 10C Early 2013-09-02 245 15 2014 10C L2 2013-09-16 259 16 2014 10C L3 2013-12-16 350 17 2014 10C LMid 2014-01-07 7 18 2015 10C Early 2014-09-08 251 19 2015 10C L2 2014-09-30 273 20 2015 10C L3 2014-12-01 335

我很难将 Julian 开始日期转换/重新分配到 7 月 1 日而不是 1 月 1 日。下面的点图说明了在年初(2 月至 3 月)发生的最终抽样。 数据图示例chron软件包有一个重新排序的选项,origin但我无法让它与我的数据一起正常工作。

library(chron) library(dplyr) data.date <- data %>% mutate(July.Julian = chron(date,format = c(dates = "ymd"), options(chron.origin = c(month=7, day=1, year=2008)))) Error in chron(c("2008-09-15", "2008-09-29", "2008-12-15", "2009-08-31", : misspecified chron format(s) length

或者

July.Julian = chron(data$date, format = c(dates = "ymd"), options(chron.origin = c(month=7, day=1, year=2008))) Error in chron(c("2008-09-15", "2008-09-29", "2008-12-15", "2009-08-31", : misspecified chron format(s) length

我试图以 1 而不是 182 开始 Julian 日期。

欢迎提出想法或建议。

4

1 回答 1

2

假设July.Julian应该是Julian7 月 1 日之后的几天:

transform(date.data, July.Julian = as.chron(sprintf("%d-07-01", year)) + Julian)

或者

date.data %>% mutate(July.Julian = as.chron(sprintf("%d-07-01", year)) + Julian)

请注意,这里实际上不需要 chron 。只需替换as.chronas.Date其中任何一个工作即可。

于 2015-02-06T01:44:29.347 回答