Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A333020
Starts of runs of 3 consecutive even numbers that are all totient numbers (A002202).
6
2, 4, 6, 8, 16, 18, 20, 28, 40, 42, 44, 52, 54, 56, 78, 80, 100, 102, 104, 106, 108, 126, 128, 136, 160, 162, 164, 176, 196, 208, 220, 222, 224, 260, 268, 292, 328, 342, 344, 356, 378, 380, 416, 438, 440, 460, 462, 464, 476, 498, 500, 502, 504, 520, 560, 584
OFFSET
1,1
LINKS
EXAMPLE
2 is a term since 2, 4 and 6 are all totient numbers.
PROG
(PARI) m = 3; v = vector(m); for(k=1, m, v[k] = istotient(2*k)); for(k = m+1, 300, 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