login
A333022
Starts of runs of 5 consecutive even numbers that are all totient numbers (A002202).
6
2, 4, 16, 40, 52, 100, 102, 104, 160, 220, 460, 498, 500, 856, 880, 1276, 1480, 1660, 1804, 2200, 2236, 3016, 3160, 3460, 4516, 4780, 5500, 5920, 6040, 6196, 6820, 7240, 7636, 7696, 7720, 8536, 8620, 9196, 9460, 9880, 10456, 12916, 13756, 13960, 14416, 15640
OFFSET
1,1
LINKS
EXAMPLE
2 is a term since 2, 4, 6, 8 and 10 are all totient numbers.
PROG
(PARI) m = 5; v = vector(m); for(k=1, m, v[k] = istotient(2*k)); for(k = m+1, 7500, if(Set(v) == [1], print1(2*(k-m), ", ")); v = concat(v[2..m], istotient(2*k)))
KEYWORD
nonn
AUTHOR
Amiram Eldar, Mar 05 2020
STATUS
approved