问题描述
for(i in 1:length(data)){
randomselector<-0
sumofdegreesequence<-sum(data)
randomselector<-runif(n=1,min=0,max=1)
if(i!=minindex){
for(j in 1:length(data)){
if(randomselector<((sum(data[1:j]))/sumofdegreesequence)){ ##Error line
selectednextvertex<-j
}else{
j<-j
}
}
data[minindex]<-data[minindex]-1
data[selectednextvertex]<-data[selectednextvertex]-1
}else{
i<-i
}
if(data[minindex]==0){
break
}
}
我在需要 TRUE/FALSE 并且我的数据是缺失值
data<-c(4,4,3,2,1,2).
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)