Question

我对R不熟悉，因此我需要帮助。我有一个来自netCDF的30年度数据集：维度：时间纬度，经度

Data: num [1:10958, 1:29, 1:57] 0.595 5.751 ....
..- attr(*,"dimensions") = chr[1:3] "time" "lat" "lon"

时间是：

Dates : List of 2
..$start: chr [1:10958] “1971-01-01 12:00:00 GTM” “1971-01-02 12:00:00 GTM” …
..$end: chr [1:10958] “1971-01-01 12:00:00 GTM” “1971-01-02 12:00:00 GTM” …

我通过以下方式删除了2月29日（闰年数据）中的数据：

datesList1 <- as.POSIXct(pred$Dates$start, tz = "GMT", format = "%Y-%m-%d")
 yearList1 <- unlist(strsplit(as.character(datesList1), "[-]"))
  dayListPred <- array(data = c(as.numeric(yearList1[seq(2,length(yearList1),3)]),as.numeric(yearList1[seq(3,length(yearList1),3)])), dim = c(length(datesList1),2))
      leap_p <- array(0,c(nrow(dayListPred),1))
      k_p <- which(dayListPred[,1]==2 & dayListPred[,2]==29)
      leap_p[k_p] <- 1
      leap_p <- which(leap_p ==0)
      pred$Data <- pred$Data[leap_p,,]

我想在新的时间维度中重新定义pred$Data，因此我需要从原始日期属性中删除闰年。有人可以建议我一个解决方案？

如何从R中删除闰年时间属性？

0 个答案: