login
A326817
Numbers k such that phi(k) > phi(k+1) > phi(k+2) > phi(k+3) where phi is the Euler totient function (A000010).
2
823, 943, 3133, 4387, 4873, 5443, 5563, 5863, 7213, 7753, 7873, 8383, 9007, 10333, 10693, 11113, 11503, 12043, 12763, 13483, 13843, 13921, 14623, 14683, 16573, 16663, 16963, 16993, 17113, 17983, 19003, 19093, 19303, 20083, 20143, 20953, 21613, 21733, 22513
OFFSET
1,1
REFERENCES
Jean-Marie De Koninck, Those Fascinating Numbers, American Mathematical Society, 2009, page 106, entry 823.
LINKS
EXAMPLE
823 is in the sequence since phi(823) = 822, phi(824) = 408, phi(825) = 400, phi(826) = 348, and 822 > 408 > 400 > 348.
MATHEMATICA
aQ[n_] := AllTrue[Differences @ EulerPhi[n + Range[0, 3]], # < 0 &]; Select[Range[23000], aQ] (* Amiram Eldar, Oct 20 2019 *)
CROSSREFS
Subsequence of A328056.
Sequence in context: A103764 A189121 A364538 * A271044 A252539 A033531
KEYWORD
nonn
AUTHOR
Kritsada Moomuang, Oct 20 2019
STATUS
approved