第七色在线视频,2021少妇久久久久久久久久,亚洲欧洲精品成人久久av18,亚洲国产精品特色大片观看完整版,孙宇晨将参加特朗普的晚宴

為了賬號安全,請及時綁定郵箱和手機立即綁定
已解決430363個問題,去搜搜看,總會有你想問的

R語言編寫求最小值函數(shù)?

R語言編寫求最小值函數(shù)?

qq_闞侃侃_0 2017-03-21 10:51:28
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])}這是我編寫的求最小值函數(shù),但是運行結(jié)果卻不對,顯示錯位是這個:Error in if (x[i] < x[i + 1]) { : argument is of length zero,誰能告訴我錯在哪里?怎樣修改?
查看完整描述

1 回答

?
李東岳

TA貢獻10條經(jīng)驗 獲得超1個贊

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?這樣一直循環(huán)只會比較相鄰的值, for(i in 1:length(x)){ min<-x[1] if(min>x[i+1]) min<-x[i+1] return(min) } 手機打的,好難過,基本就是這樣,有問題再說 ? ? ? ??

用電腦測試了一下

tmin <- function(x){

? min <- x[1];

? for(i in 2:length(x))

? ? if(min>x[i])

? ? ? min <- x[i];

??

? return(min);

}


c1 <- c(7,9,2,1,5,0,6,2)

tmin(c1)

?? ? ? ? ? ? ? ? ??

查看完整回答
反對 回復(fù) 2017-03-21
  • 1 回答
  • 0 關(guān)注
  • 3366 瀏覽
慕課專欄
更多

添加回答

舉報

0/150
提交
取消
微信客服

購課補貼
聯(lián)系客服咨詢優(yōu)惠詳情

幫助反饋 APP下載

慕課網(wǎng)APP
您的移動學習伙伴

公眾號

掃描二維碼
關(guān)注慕課網(wǎng)微信公眾號