A119490 - OEIS

This site is supported by donations to The OEIS Foundation.

A119490

Sum of the absolute values in row n of A118687.

1, 2, 4, 8, 16, 80, 400, 10000, 250000, 48250000, 83424250000, 1441654464250000 (list; graph; refs; listen; history; internal format)

	OFFSET	`0,2`
	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. A118687.` `Sequence in context: A001127 A051299 A097049 * A013174 A098204 A095197` `Adjacent sequences: A119487 A119488 A119489 * A119491 A119492 A119493`
	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 14:12 EST 2012. Contains 206031 sequences.