A084079 Sum of absolute values of lists created by n substitutions k -> Range(-abs(k+1),abs(k-1),2) starting with {1}.

1, 2, 7, 16, 53, 130, 431, 1104, 3689, 9730, 32775, 88288, 299501, 819714, 2797471, 7752160, 26590865, 74424834, 256392071, 723502960, 2501705381, 7107822722, 24656057167

Offset

0,2

Comments

Sums of absolute of sublists from A084075.

Links

Table of n, a(n) for n=0..22.

Sean A. Irvine, Java program (github)

Example

Sums of absolute values of {1}, {-2,0}, {-1,1,3,-1,1}, {0,2,-2,0,-4,-2,0,2,0,2,-2,0} are 1,2,7,16.

Mathematica

Plus@@@Abs/@Flatten/@NestList[ # /. k_Integer :> Range[ -Abs[k+1], Abs[k-1], 2]&, {1}, 12]

Crossrefs

Cf. A084075.

Sequence in context: A330227 A322192 A000512 * A286848 A239425 A042689

Adjacent sequences: A084076 A084077 A084078 * A084080 A084081 A084082

Keyword

nonn,more

Author

Wouter Meeussen, May 11 2003

Extensions

a(13)-a(22) from Sean A. Irvine, Mar 09 2026

Status

approved