A084079 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A084079

Sum of absolute values of lists created by n substitutions k -> Range[ -Abs[k+1],Abs[k-1],2] starting with {1}.

0

1, 2, 7, 16, 53, 130, 431, 1104, 3689, 9730, 32775, 88288, 299501

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

COMMENTS

Sums of absolute of sublists from A084075.

LINKS

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

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

Sequence in context: A330227 A322192 A000512 * A286848 A239425 A042689

Adjacent sequences: A084076 A084077 A084078 * A084080 A084081 A084082

KEYWORD

nonn

AUTHOR

Wouter Meeussen, May 11 2003

STATUS

approved