如何在R语言中用循环语句求一列中每24个数的均值

Python019

如何在R语言中用循环语句求一列中每24个数的均值,第1张

mean_24 <- function(x){

k=NULL

for(i in 24:length(x))

{k[i-23]=sum(x[seq(i-23,i)])/24}

return(k)

}

vec = vector(length =1000)

for(i in 1:1000)

   vec[i] = UR_FUNC()

mean(vec)