[go: up one dir, main page]

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

Showing all changes.
Length of FixedPointList leading to value of [10^n]-th composite number.
(history; published version)
#8 by Joerg Arndt at Thu Aug 29 05:23:02 EDT 2019
STATUS

proposed

approved

#7 by Michel Marcus at Thu Aug 29 02:17:31 EDT 2019
STATUS

editing

proposed

#6 by Michel Marcus at Thu Aug 29 02:17:29 EDT 2019
CROSSREFS
KEYWORD

nonn,more

STATUS

approved

editing

#5 by N. J. A. Sloane at Tue Oct 15 22:31:26 EDT 2013
AUTHOR

_Labos E. (labos(AT)ana.sote.hu), Elemer_, Jul 22 2002

Discussion
Tue Oct 15
22:31
OEIS Server: https://oeis.org/edit/global/2029
#4 by Russ Cox at Fri Mar 30 17:30:48 EDT 2012
COMMENTS

One plus the number of iterations necessary to reach the composite number using the formula in the program. - _Robert G. Wilson v (rgwv(AT)rgwv.com), _, Jul 23 2002

EXTENSIONS

More terms from _Robert G. Wilson v (rgwv(AT)rgwv.com), _, Jul 23 2002

Discussion
Fri Mar 30
17:30
OEIS Server: https://oeis.org/edit/global/156
#3 by N. J. A. Sloane at Fri Feb 24 03:00:00 EST 2006
MATHEMATICA

Table[Length[FixedPointList[10^w+PrimePi[ # ]+1&, 10^w]]-1, {w, 1, 11}]

KEYWORD

nonn,new

nonn

#2 by N. J. A. Sloane at Tue Jan 24 03:00:00 EST 2006
KEYWORD

nonn,new

nonn

AUTHOR

Labos E. (labos(AT)ana1ana.sote.hu), Jul 22 2002

#1 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003
NAME

Length of FixedPointList leading to value of [10^n]-th composite number.

DATA

4, 4, 4, 5, 5, 6, 7, 7, 7, 8, 8, 9, 9

OFFSET

1,1

COMMENTS

One plus the number of iterations necessary to reach the composite number using the formula in the program. - Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 23 2002

FORMULA

See program below.

EXAMPLE

n=10^11: the list= {100000000000, 104118054814, 104280509328, 104286914053, 104287166025, 104287176027, 104287176414, 104287176419}, its length including initial term is 8, so a(11)=8.

MATHEMATICA

Table[Length[FixedPointList[10^w+PrimePi[ # ]+1&, 10^w]]-1, {w, 1, 11}]

CROSSREFS
KEYWORD

nonn

AUTHOR

Labos E. (labos(AT)ana1.sote.hu), Jul 22 2002

EXTENSIONS

More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 23 2002

STATUS

approved