The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A132384 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A132384

a(n) = Sum_{ k <= n, k is not an i-th power with i >= 2} k.
(history; published version)

#8 by Alois P. Heinz at Sun Sep 08 19:56:04 EDT 2024

STATUS

proposed

approved

#7 by Andrew Howroyd at Sun Sep 08 18:40:18 EDT 2024

STATUS

editing

proposed

#6 by Andrew Howroyd at Sun Sep 08 18:39:59 EDT 2024

PROG

(PARI) a(n) = sum(x=1, n, if(!ispower(x), x));

Discussion

Sun Sep 08

18:40

Andrew Howroyd: Tidied up

#5 by Andrew Howroyd at Sun Sep 08 18:39:43 EDT 2024

PROG

(PARI) gpwra(n) = s=0; forsum(x=1, n, if(!ispower(x), s+= x)); s

sgpwr(n) = for(j=1, n, print1(gpwr(j)", "))

STATUS

proposed

editing

#4 by Robert C. Lyons at Sun Sep 08 18:32:27 EDT 2024

STATUS

editing

proposed

#3 by Robert C. Lyons at Sun Sep 08 18:32:25 EDT 2024

PROG

(PARI) sgpwr(n) = for(j=1, n, print1(gpwr(j)", ")) gpwr(n) = s=0; for(x=1, n, if(!ispower(x), s+=x)); s

sgpwr(n) = for(j=1, n, print1(gpwr(j)", "))

STATUS

approved

editing

#2 by N. J. A. Sloane at Tue Oct 01 21:35:24 EDT 2013

AUTHOR

_Cino Hilliard (hillcino368(AT)hotmail.com), _, Nov 07 2007

Discussion

Tue Oct 01

21:35

OEIS Server: https://oeis.org/edit/global/1959

#1 by N. J. A. Sloane at Sun Dec 09 03:00:00 EST 2007

NAME

a(n) = Sum_{ k <= n, k is not an i-th power with i >= 2} k.

DATA

1, 3, 6, 6, 11, 17, 24, 24, 24, 34, 45, 57, 70, 84, 99, 99, 116, 134, 153, 173, 194, 216, 239, 263, 263, 289, 289, 317, 346, 376, 407, 407, 440, 474, 509, 509, 546, 584, 623, 663, 704, 746, 789, 833, 878, 924, 971, 1019, 1019, 1069, 1120, 1172, 1225, 1279

OFFSET

1,2

PROG

(PARI) sgpwr(n) = for(j=1, n, print1(gpwr(j)", ")) gpwr(n) = s=0; for(x=1, n, if(!ispower(x), s+=x)); s

KEYWORD

nonn

AUTHOR

Cino Hilliard (hillcino368(AT)hotmail.com), Nov 07 2007

STATUS

approved