A119489 - OEIS

This site is supported by donations to The OEIS Foundation.

A119489

Sum of the absolute values in row n of A118686.

1, 2, 4, 12, 84, 588, 18228, 565068, 119229348, 25157392428, 5308209802308, 1120032268286988 (list; graph; refs; listen; history; internal format)

	OFFSET	`0,2`
	FORMULA	`a(n) = sum_{k=0..n} abs( A118686(n,k) ).`
	MATHEMATICA	`g[n_] := If[PrimeQ[n] == True, n, 1]; p[0] = 1; p[n_Integer?Positive] := p[n] = g[n]*p[n - 1]; a = Flatten[Join[{{1}}, Table[Apply[Plus, Abs[Reverse[CoefficientList[Product[x - p[n], {n, 0, m}], x]]]], {m, 0, 10}]]]`
	CROSSREFS	`Cf. A118686.` `Sequence in context: A002080 A001206 A144295 * A053631 A120618 A038791` `Adjacent sequences: A119486 A119487 A119488 * A119490 A119491 A119492`
	KEYWORD	`nonn`
	AUTHOR	`Roger L. Bagula (rlbagulatftn(AT)yahoo.com), May 25 2006`

Content is available under The OEIS End-User License Agreement .

Last modified February 17 16:49 EST 2012. Contains 206058 sequences.