

A342591


Numbers k such that A340740(k) <= k.


0



1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 24, 25, 26, 28, 30, 32, 33, 34, 36, 40, 42, 46, 48, 54, 60, 78
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

Numbers k such that Sum_{1<=j<=k/2, j and k coprime} (kj mod j) <= k.
Conjecture: these are all the terms.
The terms with A340740(k) = k are 19 and 48.


LINKS



EXAMPLE

a(7) = 7 is a term because A340740(7) = 2 <= 7.


MAPLE

f:= proc(n) local k;
add(`if`(igcd(k, n)=1, n mod k, 0), k=1..floor(n/2))
end proc:
select(t > f(t) <= t, [$1..1000]);


CROSSREFS



KEYWORD

nonn,more


AUTHOR



STATUS

approved



