菜鸟求助.r语言用冒泡排序法实现对100个随机数的排序

Question

如题所述

Answer 1

#产生0-1内的10个随机数，扩大100倍，然后取整。（自己改成100就行了）
#就是0-100内的10个随机整数
x <- as.integer(runif(10)*100);
x
for(i in 1:(length(x)-1)){
for(j in 1:(length(x)-i)){
if(x[j]>x[j+1]){
temp <- x[j]
x[j] <- x[j+1]
x[j+1] <- temp
}
}
}
x