问一个排序问题，把C++的思想弄过来怎么不行啊

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

f<-function(x){
n=length(x)
for(i in 1:n){
for(j in (i+1):n){
if(x[j]<x[i])
{ z=x[i];x[i]=x[j];x[j]=z}
                 }
             }
x
}
> x=c(1,3,4,3,2,6)
> f(x)
错误于if (x[j] < x[i]) { : 需要TRUE/FALSE值的地方不可以用缺少值

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：LSE TRU Rue

i=6的时候,j=7,x[j]=NULL,出错了。
应改为for(i in 1:(n-1))

哈哈，第一，这样的算法不叫C++思想，复制交换在没有面向对象思想时就有了，那时候连C还没有呢，不要说C++，不要乱扣帽子呦。
第二，不是R不行，是lz程序写的不行。你的内层循环赋值出窍了。

同意楼上，不过不干嘛直接sort(x)

lww1993 发表于 2013-11-3 22:23
i=6的时候,j=7,x[j]=NULL,出错了。
应改为for(i in 1:(n-1))

谢谢了啊

ltx5151 发表于 2013-11-4 10:05
哈哈，第一，这样的算法不叫C++思想，复制交换在没有面向对象思想时就有了，那时候连C还没有呢，不要说C++， ...

循环赋值出窍了
-------------------------
很形象

红与黑的铭记 发表于 2013-11-4 19:46
谢谢了啊

不客气~