看板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海