如果R中的条件为循环

Question

我试图在向量中存储大于1的所有值。但是，只存储最高的。见下面的代码。任何帮助将不胜感激。

y <- [0.02408371 0.48230110 0.43027578 1.14913520 1.50040601]

z <- c()

for(i in y){

    if(i>1){
    z[i]<-i
    }
}