|
|
A277853
|
|
Indices m of "late birds", i.e., values a(m) < a(k) for all k > m, in A075771 = quotient + remainder in Euclidean division of n^2 by prime(n).
|
|
4
|
|
|
1, 2, 4, 5, 21, 27, 44, 104, 173, 365, 369, 500, 590, 735, 840, 987, 1564, 1797, 2415, 3368, 3545, 4025, 4466, 5018, 5477, 6686, 7239, 8025, 8182, 9369
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
PROG
|
(PARI) A277853(N, L=N^2/prime(N), A=A075771, S=List())={forstep(n=N, 1, -1, A(n)<L&&listput(S, n)&&L=A(n)); Set(S)}
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|