如果我有这个:
dat=c("2000", "2050", "2100", "2150", "2200", "2250", "2000", "2350", "2400", "2450")
我可以代替使用
la=gsub("2000", "", dat)
我需要的是保持每四个元素,成为
c("", "", "", "2150", "", "", "", "2350", "", "")
如果我有这个:
dat=c("2000", "2050", "2100", "2150", "2200", "2250", "2000", "2350", "2400", "2450")
我可以代替使用
la=gsub("2000", "", dat)
我需要的是保持每四个元素,成为
c("", "", "", "2150", "", "", "", "2350", "", "")
dat[-seq(4, length(dat), by=4)] <- ""
给
> dat
[1] "" "" "" "2150" "" "" "" "2350" "" ""
seq(4, length(dat), by=4)
给出序列(4, 8, ...)
,
-
否定它