R语言编写求最小值函数
mymin<-function(x){ n<-length(x) for(i in 1:n-1){ if(x[i]<x[i+1]){ x[i+1]<-x[i] } } return(x[n]) } 我想编写一个求最小值的函数，但是这个运行却不对，谁能告诉我应该怎样修改？
1 回答
举报
0/150
提交
取消
mymin<-function(x){ n<-length(x) for(i in 1:n-1){ if(x[i]<x[i+1]){ x[i+1]<-x[i] } } return(x[n]) } 我想编写一个求最小值的函数，但是这个运行却不对，谁能告诉我应该怎样修改？
2017-03-21
举报
