如何用R写简单的递归函数？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

f(0)=1,f(1)=2,f(x+2)=f(x)+f(x+1) ,求f(2),f(3),…f(30)的值如何用R语言编写啊？？尝试很多方法都不行，求大神指教

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏2 回帖

关键词：如何用 R语言 如何

自己搞定了居然~~~

网上搜一搜

不是什么高精尖

1. Fubini <- function(n){
   
2.   if ((n == 0) | (n == 1)){
   
3.     out = 1   
   
4.   } else {
   
5.     out = Fubini(n-1)+Fubini(n-2)   
   
6.   }
   
7.   return(out)
   
8. }
   
9. Fubini(5)
   
10. sapply(0:30,Fubini)

复制代码

R里有个做迭代的包叫foreach，
f<-vector()
f[1]=1
f[2]=2
library(foreach)
foreach(i =1:31){f[i]=f[i-1]+f[i-2]}

> F<-function(x){
+ if(x==0){out=1}
+ else if(x==1){out=2}
+ else{out=F(x-2)+F(x-1)}
+ return(out)}
> F(0)