Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.soft-sys.math.mathematica > #3650
| From | rych <rychphd@gmail.com> |
|---|---|
| Newsgroups | comp.soft-sys.math.mathematica |
| Subject | Re: sequence of functions |
| Date | 2011-07-11 10:56 +0000 |
| Organization | Steven M. Christensen and Associates, Inc and MathTensor, Inc. |
| Message-ID | <ivektj$858$1@smc.vnet.net> (permalink) |
| References | <201107080855.EAA28789@smc.vnet.net> <iv9eqf$dfb$1@smc.vnet.net> |
Yes, indeed, wrapping it with Evaluate did it. Thanks, Heike. Bobby, f[n_][x_] := f[n][x] = ... results in caching for not only each n and each x. Dana, how did you apply FindSequenceFunction to get the direct formula?! Thanks Igor On Jul 9, 11:42 pm, Heike Gramberg <heike.gramb...@gmail.com> wrote: > What about > > f[0] = Function[x, x (1 - x)] > f[n_] := f[n] = > Function[x, Evaluate[Simplify[f[n - 1][2 x] + f[n - 1][2 x - 1]]]]= ; > > Then > > f[2][x]; > ?f > > returns: > > Global`f > f[0]=Function[x,x (1-x)] > f[1]=Function[x$,-2 (1-2 x$)^2] > f[2]=Function[x$,-20+64 x$-64 x$^2] > f[n_]:=f[n]=Function[x,Evaluate[Simplify[f[n-1][2 x]+f[n-1][2 x-1]]]] > > Heike
Back to comp.soft-sys.math.mathematica | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread
Re: sequence of functions Heike Gramberg <heike.gramberg@gmail.com> - 2011-07-09 11:42 +0000 Re: sequence of functions rych <rychphd@gmail.com> - 2011-07-11 10:56 +0000 Re: sequence of functions DrMajorBob <btreat1@austin.rr.com> - 2011-07-12 11:07 +0000
csiph-web