|
Search: id:A119490
|
|
|
| A119490 |
|
Absolute value of the sum of rows in A118687 triangular array of the Stirling first kind. |
|
+0 1
|
|
| 1, 2, 4, 8, 16, 80, 400, 10000, 250000, 48250000, 83424250000, 1441654464250000
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Together with A118687 this makes probability like numbers that could be used for Bernstein-Bezier type normalized polynomials: with the A118686 type triangular array it makes general factoring of Pascal's triangle into two partitions of prime like and composite like events.
|
|
FORMULA
|
T[n,m]=A118687[n,m] a(n) = Sum[Abs[T[n,m]]
|
|
MATHEMATICA
|
f[n_] := If[PrimeQ[n] == True, 1, n]; cf[0] = 1; cf[n_Integer?Positive] := cf[n] = f[n]*cf[n - 1] a = Flatten[Join[{{1}}, Table[Apply[Plus, Abs[Reverse[CoefficientList[Product[x - cf[n], {n, 0, m}], x]]]], {m, 0, 10}]]]
|
|
CROSSREFS
|
Cf. A123457, A118686, A118687.
Sequence in context: A001127 A051299 A097049 this_sequence A013174 A098204 A095197
Adjacent sequences: A119487 A119488 A119489 this_sequence A119491 A119492 A119493
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), May 25 2006
|
|
|
Search completed in 0.002 seconds
|