|
Search: id:A134748
|
|
| |
|
| -1, -3, -6, 34, 1065, 21915, 458276, 10381380, 257910255, 7023426505, 208771773342, 6739114316358, 235020287563061, 8812102803936999, 353674208662429320, 15133351271499561736, 687862113868372542939, 33104027829427142199381
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MAPLE
|
a = {}; d = {}; e = {-1}; Do[b = {}; c = {}; Do[If[k > 0, AppendTo[b, k]]; AppendTo[c, n - k], {k, 0, n}] ; AppendTo[a, FromDigits[b, n + 1]]; AppendTo[d, FromDigits[c, n + 1]], {n, 1, 30}]; Do[AppendTo[e, d[[n]] - a[[n + 1]]], {n, 1, 29}]; e
|
|
CROSSREFS
|
Cf. A062813, A134640, A134703.
Sequence in context: A133665 A124178 A101142 this_sequence A068904 A009197 A130317
Adjacent sequences: A134745 A134746 A134747 this_sequence A134749 A134750 A134751
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Nov 08 2007, Nov 10 2007
|
|
|
Search completed in 0.002 seconds
|
