data <- read.csv(filepath)
date <- data[ ,1]
years <- unique(year(date))
for (k in 1:length(years)) {
nyears <- length(date[grep(years[k],date)])
if(nyears>=365) cyears[k] <- years[k]
wzyears<- list(cyears)
} }
|
楼主: 秦小兽
|
1359
2
[问答] R语言 为什么多循环了几次 |
|
学前班 70%
-
|
| ||
|
|
加好友,备注cda京ICP备16021002号-2 京B2-20170662号
京公网安备 11010802022788号
论坛法律顾问:王进律师
知识产权保护声明
免责及隐私声明


