看板Statistics
標 題Re: [問題] 軟體R
發信站無名小站 (Wed Mar 8 14:24:13 2006)
轉信站ptt!Group.NCTU!grouppost!Group.NCTU!wretch
※ 引述《[email protected] (unbiased)》之銘言:
> X(n+2)=X(n+1)+X(n), n=0,1,2....
> X0=0,X1=1
> 要找出第一個Xn 使得 Xn>100
> 這程式碼怎麼寫啊?><
方法一
k=numeric()
k[1]=0
k[2]=1
i=2
while(k[i]<100){
i=i+1
k[i]=k[i-1]+k[i-2]
}
假設 i=13 迴圈停止,則知 X(12)>100,如果用原po定義的index的話。
方法二 (先到到CRAN下載『gmp』這個package)
library(gmp)
i=0
while(fibnum(i)<100) i=i+1
迴圈停止時的 i,即為所求。
--
戰神無淚 英雄無悔
--
夫兵者不祥之器物或惡之故有道者不處君子居則貴左用兵則貴右兵者不祥之器非君子
之器不得已而用之恬淡為上勝而不美而美之者是樂殺人夫樂殺人者則不可得志於天下
矣吉事尚左凶事尚右偏將軍居左上將軍居右言以喪禮處之殺人之眾以哀悲泣之戰勝以
喪禮處之道常無名樸雖小天下莫能臣侯王若能守之萬物將自賓天地相合以降甘露民莫
之令而自均始制有名名亦既有夫亦將知止知止可以不殆譬 pc70.stat.nthu.edu.tw海