A075457 Integer averages of first n perfect powers for some n.

1, 198, 1070, 2574, 10769, 66908, 1036663, 6436241, 12745650, 2253183029, 81422343214, 278747505724, 352663623088, 537668537432, 807810573770, 3169762558125, 3623176921864, 4225712901909, 4395991005975, 15435175116616, 1361811565229752

Offset

1,2

Links

Table of n, a(n) for n=1..21.

Example

198 is average of first n=33 perfect powers, 1070 (n=73), 2574 (n=111), 10769 (n=219), 66908 (n=519), 1036663 (n=1943).

Prog

(PARI) lista(nn) = {vec = vector(nn, i, i); pp = concat(1, select(i->ispower(i) , vec)); s = 0; for (i = 1, #pp, s += pp[i]; if ((s % i) == 0, print1(s/i, ", ")); ); } \\ Michel Marcus, Oct 02 2013

Crossrefs

Cf. A001597.

Sequence in context: A156771 A065697 A159204 * A364860 A224452 A227705

Adjacent sequences: A075454 A075455 A075456 * A075458 A075459 A075460

Keyword

easy,nonn

Author

Zak Seidov, Oct 11 2002

Extensions

Extended by Robert G. Wilson v, Oct 14 2002

a(8)-a(21) from Donovan Johnson, Oct 05 2013

Status

approved