|
Search: id:A131055
|
|
|
| A131055 |
|
1 followed by repeats of 2*k. |
|
+0
5
|
|
| 1, 2, 2, 4, 4, 6, 6, 8, 8, 10, 10, 12, 12, 14, 14, 16, 16, 18, 18, 20, 20, 22, 22, 24, 24, 26, 26, 28, 28, 30, 30, 32, 32, 34, 34, 36, 36, 38, 38, 40, 40, 42, 42, 44, 44, 46, 46, 48, 48, 50, 50, 52, 52, 54, 54, 56, 56, 58, 58, 60, 60, 62, 62, 64, 64, 66, 66, 68, 68, 70, 70, 72
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
Inverse binomial transform of A131056: (1, 3, 7, 17, 41, 97, 225,...).
a(n)=1+sum{i=0..n}{1-(-1)^i-[i!^2 mod (i+1)]*[(i+1)!^2 mod (i+2)]}, with n>=0 - Paolo P. Lava (ppl(AT)spl.at), Jul 24 2007
|
|
MAPLE
|
P:=proc(n) local i, j, k; for i from 0 by 1 to n do j:=1+sum('1-(-1)^k-(k!^2 mod (k+1))*((k+1)!^2 mod (k+2))', 'k'=0..i); print(j); od; end: P(100); - Paolo P. Lava (ppl(AT)spl.at), Jul 24 2007
|
|
MATHEMATICA
|
Join[{1}, Table[2*Floor[i/2], {i, 2, 81}]] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jun 13 2007
|
|
CROSSREFS
|
Cf. A131056.
Sequence in context: A096494 A116568 A061106 this_sequence A052928 A137501 A005186
Adjacent sequences: A131052 A131053 A131054 this_sequence A131056 A131057 A131058
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Gary W. Adamson (qntmpkt(AT)yahoo.com), Jun 12 2007
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jun 13 2007
|
|
|
Search completed in 0.002 seconds
|
