|
| |
|
|
A132831
|
|
Largest terms a(n) forming a self-convolution of an integer sequence (A132832) such that: a(n) <= 2*a(n-1) for n>0 with a(0)=1.
|
|
7
| |
|
|
1, 2, 3, 6, 11, 22, 44, 88, 175, 350, 700, 1400, 2799, 5598, 11195, 22390, 44779, 89558, 179115, 358230, 716459, 1432918, 2865835, 5731670, 11463340, 22926680, 45853360, 91706720, 183413439, 366826878, 733653755, 1467307510, 2934615019
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| a(n) ~ 2^n*c where c=0.683268303731665578137197731736227240453607...
|
|
|
PROG
| (PARI) {a(n)=local(B=[1], t); if(n==0, 1, for(k=1, n, t=2*a(k-1); B=concat(B, t); B[ #B]=t+1-denominator(Vec(Ser(B)^(1/2))[ #B]) )); B[n+1]}
|
|
|
CROSSREFS
| Cf. A132832.
Sequence in context: A063895 A027214 A192652 * A007477 A096202 A036653
Adjacent sequences: A132828 A132829 A132830 * A132832 A132833 A132834
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), Sep 07 2007
|
| |
|
|