%I #9 Mar 06 2020 00:57:26
%S 2,4,6,16,18,40,42,52,54,78,100,102,104,106,126,160,162,220,222,342,
%T 378,438,460,462,498,500,502,856,858,880,882,1086,1276,1278,1300,1422,
%U 1480,1482,1566,1660,1662,1804,1806,1996,2058,2200,2202,2236,2238,3016,3018
%N Starts of runs of 4 consecutive even numbers that are all totient numbers (A002202).
%H Amiram Eldar, <a href="/A333021/b333021.txt">Table of n, a(n) for n = 1..10000</a>
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Euler%27s_totient_function#Totient_numbers">Totient numbers</a>.
%e 2 is a term since 2, 4, 6 and 8 are all totient numbers.
%o (PARI) m = 4; v = vector(m); for(k=1, m, v[k] = istotient(2*k)); for(k = m+1, 1500, if(Set(v) == [1], print1(2*(k-m),", ")); v = concat(v[2..m], istotient(2*k)))
%Y Cf. A000010, A002202, A005277, A063512, A083533, A333019, A333020, A333022, A333023, A333024.
%K nonn
%O 1,1
%A _Amiram Eldar_, Mar 05 2020