[go: up one dir, main page]

login
Revision History for A132337 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Sum of the integers from 1 to n, excluding the perfect sixth powers.
(history; published version)
#28 by Harvey P. Dale at Wed Jun 01 17:45:46 EDT 2022
STATUS

editing

approved

#27 by Harvey P. Dale at Wed Jun 01 17:45:43 EDT 2022
MATHEMATICA

Accumulate[Table[If[IntegerQ[Surd[n, 6]], 0, n], {n, 60}]] (* Harvey P. Dale, Jun 01 2022 *)

STATUS

approved

editing

#26 by Joerg Arndt at Sat Oct 05 04:02:48 EDT 2019
STATUS

reviewed

approved

#25 by Michel Marcus at Sat Oct 05 03:52:57 EDT 2019
STATUS

proposed

reviewed

#24 by Jon E. Schoenfield at Sat Oct 05 03:46:08 EDT 2019
STATUS

editing

proposed

#23 by Jon E. Schoenfield at Sat Oct 05 03:46:01 EDT 2019
FORMULA

Let r = floor(n^(1/6)). Then a(n) = n(n+1)/2 - (r^7/7 + r^6/2 + r^5/2 - r^3/6 + r/42) = A000217(n) - A000540(r).

EXTENSIONS

Edited by the Assoc. Editors of the OEIS, Oct 12 2010. Thanks to _Daniel Mondot _ for pointing out that the sequence needed editing.

STATUS

approved

editing

#22 by Peter Luschny at Fri Apr 12 07:29:59 EDT 2019
STATUS

reviewed

approved

#21 by Vaclav Kotesovec at Fri Apr 12 05:33:34 EDT 2019
STATUS

proposed

reviewed

#20 by Michel Marcus at Thu Apr 11 14:50:03 EDT 2019
STATUS

editing

proposed

Discussion
Thu Apr 11
15:04
Michel Marcus: yes, for me, recurrence fails at 64, 65, 66, 729, 730, 731, 4096, 4097, 4098, ...
15:34
Peter Luschny: What is striking is that several of the recurrences rightly complained about by Georg have the same author, who, however, does not appear by name at all. For me, this is also a failure of the method of signing contributions.
Fri Apr 12
05:33
Vaclav Kotesovec: b-file is correct
#19 by Michel Marcus at Thu Apr 11 14:45:40 EDT 2019
EXTENSIONS

Incorrect program replaced by _R. J. Mathar, _, Oct 08 2010

STATUS

proposed

editing