for循环出问题求助！！感谢

静後

1364

收藏 2015-10-10

悬赏 20 个论坛币已解决

老师让自己写个让数列从小到大的code

t<-integer(0)
selsort<-function(v){
  l=length(v)
  if(l==1){
return(v)
  }else
for(i in 1:l)
   if(v==min(v)){
      t<-c(t,v)
      v<-max(v)
   }
  if(length(t)==l){
return(t)
  }else{
return(selsort(v))
  }
}

输入selsort(c(3,5,6,4,6))
Error in if (v == min(v)) { : missing value where TRUE/FALSE needed

求解决或者帮我写个从小到大的让我参考下。刚学习R  循环有点晕。  谢谢

最佳答案

dinghui0222 查看完整内容

for循环里面不对吧 selsort

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

dinghui0222

2015-10-10 10:48:03

for循环里面不对吧
selsort<-function(v){
  l=length(v)
  t<-integer(l)
  if(l==1){
return(v)
  }
  i=1;
  while(l>=1){
t[i]<-min(v)
v<-v[-which.min(v)]
l<-l-1
i<-i+1
  }
  return(t)
}

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

静後

2015-10-10 12:33:14

求帮助- -

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

hzx21th

2015-10-10 23:49:43

偏个题，我感觉你们老师此举没必要，r中直接sort就好，如果要排序直接用C语言编写就好了

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

静後

2015-10-11 03:05:03

dinghui0222 发表于 2015-10-10 10:48
for循环里面不对吧
selsort

谢谢- -

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

静後

2015-10-11 03:05:56

hzx21th 发表于 2015-10-10 23:49
偏个题，我感觉你们老师此举没必要，r中直接sort就好，如果要排序直接用C语言编写就好了

- -恩啊老师让练习下循环吧然后比较下自己写的和自带order sort差距

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

最佳答案

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群