Thanks for your suggestion, Carl. Actually I am looking for a series of functions like these
exp(-x)*.5^x exp(-x)*.5^x*(1-.4^x) exp(-x)*.5^x*(1-.4^x)*(1-.3^x) where(.5,.4,.3...) are from the coming results. I am not sure how to construct such an irregular fucntion vector. On Mar 4, 6:40 pm, Carl Witthoft <c...@witthoft.com> wrote: > My foolish move for this week: I'm going to go way out on a limb and > guess what the OP wanted was something like this. > > i=1, foo = x*exp(-x) > > i=2, foo= x^2*exp(-x) > i=3, foo = x^3*exp(-x) > . > . > . > > In which case he really should create a vector bar<-rep(na,5) , > and then inside the loop, > > bar[i]<-x^i*foo(x) > > Carl > > quoted material: > Date: Thu, 04 Mar 2010 11:37:23 -0800 (PST) > > I need to update posterior dist function upon the coming results and > find the posterior mean each time. > > On Mar 4, 1:31 pm, jim holtman <jholt..._at_gmail.com> wrote: > > What exactly are you trying to do? 'foo' calls 'foo' calls 'foo' .... > > How did you expect it to stop the recursive calls? > > > > > > > > > > > > On Thu, Mar 4, 2010 at 2:08 PM, Seeker <zhongm..._at_gmail.com> wrote: > > > Here is the test code. > > > > > foo<-function(x) exp(-x) > > > for (i in 1:5) > > > { > > > foo<-function(x) foo(x)*x > > > foo(2) > > > } > > ______________________________________________ > r-h...@r-project.org mailing listhttps://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guidehttp://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.