|
|
|
|
4, 5, 10, 13, 24, 39, 84, 168, 370, 836, 1998, 4622, 11284, 28151, 53565, 138230, 334125, 659741, 1716635, 3977282, 10430384, 27132843, 71588934, 189472352, 505341104, 1353331592
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Inspired by N. J. A. Sloane's remark about the graph of A366470 consisting of decreasing segments. Terms mark the beginning of these segments in the graph of A366470. Appears to grow exponentially. Terms seem to be near the values of t_i described in Sloane's sketch at A364054.
|
|
LINKS
|
|
|
PROG
|
(Python)
from itertools import count, islice
from sympy import nextprime
def A366864_gen(): # generator of terms
a, aset, p = 1, {0, 1}, 2
for i in count(3):
for b in count(a, p):
if b not in aset:
aset.add(b)
c = b%(p:=nextprime(p))
if c > a:
yield i
a = c
break
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|