A045964 - OEIS

A045964

Partial sums of A045954.

2, 6, 12, 22, 34, 52, 72, 94, 120, 154, 190, 232, 276, 326, 378, 432, 490, 558, 628, 704, 788, 878, 976, 1076, 1178, 1286, 1400, 1516, 1634, 1764, 1896, 2034, 2174, 2322, 2472, 2636, 2806, 2978, 3156, 3338, 3524, 3720, 3918, 4130, 4344, 4562, 4790, 5020, 5254

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

OFFSET

1,1

LINKS

Amiram Eldar, Table of n, a(n) for n = 1..10000

MATHEMATICA

seq[max_] := Module[{lst = Range[2, max, 2], i = 2, len}, While[i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++]; Accumulate[lst]]; seq[250] (* Amiram Eldar, Mar 20 2024, after Robert G. Wilson v at A045954 *)

CROSSREFS

Cf. A045954.

Sequence in context: A187490 A147623 A232234 * A005819 A322072 A304627

Adjacent sequences: A045961 A045962 A045963 * A045965 A045966 A045967

KEYWORD

easy,nonn

AUTHOR

Felice Russo

EXTENSIONS

More terms from David W. Wilson

STATUS

approved