我是编程新手,刚刚开始学习R语言。我正在尝试进行冒泡排序,但它显示以下错误消息。谁能帮我解决这个问题吗?
x <-sample(1:100,10)
n <- length(x)
example <- function(x)
{
for (i in 1:n-1)
{
while (x[i] > x[i+1])
{
temp <- x[i+1]
x[i+1] <- x[i]
x[i] <- temp
}
i <- i+1
}
}
example(x)
while (x[i] > x[i + 1]) { 中的错误:参数长度为零
x<-sample(1:100,10)
example <- function(x){
n<-length(x)
for(j in 1:(n-1)){
for(i in 1:(n-j)){
if(x[i]>x[i+1]){
temp<-x[i]
x[i]<-x[i+1]
x[i+1]<-temp
}
}
}
return(x)
}
res<-example(x)
#input
x
#output
res
只需对代码进行少量修改即可正常工作。在“R”中,最好使用 sort() 函数。
x <-sample(1:100,10)
x
res<-sort(x)
res
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)