|
|
A164654
|
|
a(n) = 2*a(n-2) for n > 2; a(1) = 3, a(2) = 8.
|
|
6
|
|
|
3, 8, 6, 16, 12, 32, 24, 64, 48, 128, 96, 256, 192, 512, 384, 1024, 768, 2048, 1536, 4096, 3072, 8192, 6144, 16384, 12288, 32768, 24576, 65536, 49152, 131072, 98304, 262144, 196608, 524288, 393216, 1048576, 786432, 2097152, 1572864, 4194304, 3145728
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
a(n) = (7+(-1)^n)*2^(1/4*(2*n-5+(-1)^n)).
|
|
MATHEMATICA
|
With[{lst2=2^Range[0, 20]}, Riffle[3*lst2, 8*lst2]] (* or *) LinearRecurrence[ {0, 2}, {3, 8}, 50](* Harvey P. Dale, Aug 20 2011 *)
|
|
PROG
|
(Magma) [ n le 2 select 5*n-2 else 2*Self(n-2): n in [1..41] ];
(Maxima) a[1]:3$ a[2]:8$ a[n]:=2*a[n-2]$ makelist(a[n], n, 1, 41); /* Bruno Berselli, May 23 2011
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|