R函数的问题

我尝试创建一个函数。但当我改变它的顺序时，它就会产生NA值。有什么特别的原因吗？谢谢

new<-function(x){
    min2<-NULL
    min1<-NULL
    len<-length(unique(x))
for (i in 1:(len-1)) 
    min2[i]<-sort(x,partial=(len-i+1))[(len-i+1)]
    min1[i]<-sort(x,partial=(len-i))  [(len-i)]
    return((min1))  
}


x<-c(1,11,40,120)

new(x)

[1] 120  40  11




new<-function(x){
    min2<-NULL
    min1<-NULL
    len<-length(unique(x))
for (i in 1:(len-1)) 
    min1[i]<-sort(x,partial=(len-i))  [(len-i)]
    min2[i]<-sort(x,partial=(len-i+1))[(len-i+1)]
    return((min1))  
}


x<-c(1,11,40,120)

new(x)

[1] NA  NA  11

---

new您忘记了要在
for
循环中重复的表达式周围的小括号：

new<-function(x){
    min2<-NULL
    min1<-NULL
    len<-length(unique(x))
    for (i in 1:(len-1)) {
      min2[i]<-sort(x,partial=(len-i+1))[(len-i+1)]
      min1[i]<-sort(x,partial=(len-i))  [(len-i)] 
    }
    return(min1)  
}

new您忘记了要在
for
循环中重复的表达式周围的小括号：

new<-function(x){
    min2<-NULL
    min1<-NULL
    len<-length(unique(x))
    for (i in 1:(len-1)) {
      min2[i]<-sort(x,partial=(len-i+1))[(len-i+1)]
      min1[i]<-sort(x,partial=(len-i))  [(len-i)] 
    }
    return(min1)  
}

new您忘记了要在
for
循环中重复的表达式周围的小括号：

new<-function(x){
    min2<-NULL
    min1<-NULL
    len<-length(unique(x))
    for (i in 1:(len-1)) {
      min2[i]<-sort(x,partial=(len-i+1))[(len-i+1)]
      min1[i]<-sort(x,partial=(len-i))  [(len-i)] 
    }
    return(min1)  
}

new您忘记了要在
for
循环中重复的表达式周围的小括号：

new<-function(x){
    min2<-NULL
    min1<-NULL
    len<-length(unique(x))
    for (i in 1:(len-1)) {
      min2[i]<-sort(x,partial=(len-i+1))[(len-i+1)]
      min1[i]<-sort(x,partial=(len-i))  [(len-i)] 
    }
    return(min1)  
}

newThanks。我真傻，竟然忘了括号。谢谢。我真傻，竟然忘了括号。谢谢。我真傻，竟然忘了括号。谢谢。我真傻，竟然忘了括号。