The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A123090 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A123090

a(1)=1. For n>=2, a(n) = a(n-1) + (largest divisor of n which occurs among the earlier terms of the sequence).
(history; published version)

#12 by Ray Chandler at Fri Oct 11 12:36:19 EDT 2019

STATUS

editing

approved

#11 by Ray Chandler at Fri Oct 11 12:36:16 EDT 2019

MATHEMATICA

f[l_List] := Block[{n = Length[l] + 1}, Append[l, Last[l] + Max[Select[l, Mod[n, # ] == 0 &]]]]; Nest[f, {1}, 60] (* _Ray Chandler_, Sep 30 2006 *)

STATUS

approved

editing

#10 by Alois P. Heinz at Wed Oct 24 20:52:44 EDT 2018

STATUS

proposed

approved

#9 by Ivan Neretin at Wed Oct 24 17:14:45 EDT 2018

STATUS

editing

proposed

#8 by Ivan Neretin at Wed Oct 24 17:14:42 EDT 2018

LINKS

Ivan Neretin, <a href="/A123090/b123090.txt">Table of n, a(n) for n = 1..10000</a>

STATUS

approved

editing

#7 by Charles R Greathouse IV at Wed Apr 09 10:16:00 EDT 2014

AUTHOR

Leroy Quet , Sep 27 2006

Discussion

Wed Apr 09

10:16

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

#6 by N. J. A. Sloane at Wed Feb 05 20:18:28 EST 2014

AUTHOR

_Leroy Quet _ Sep 27 2006

Discussion

Wed Feb 05

20:18

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

#5 by Russ Cox at Fri Mar 30 17:29:51 EDT 2012

EXTENSIONS

Extended by _Ray Chandler (rayjchandler(AT)sbcglobal.net), _, Sep 30 2006

Discussion

Fri Mar 30

17:29

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

#4 by N. J. A. Sloane at Sat Oct 02 03:00:00 EDT 2010

LINKS

Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> (listed in lieu of email address)

KEYWORD

nonn,new

nonn

#3 by N. J. A. Sloane at Fri Jan 09 03:00:00 EST 2009

LINKS

Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> (listed in lieu of email address)

KEYWORD

nonn,new

nonn

AUTHOR

Leroy Quet (qq-quet(AT)mindspring.com), Sep 27 2006