|
|
A333024
|
|
Starts of runs of 7 consecutive even numbers that are all totient numbers (A002202).
|
|
5
|
|
|
100, 26734060, 3149734998, 12960114796, 15685683796, 24077884060, 36987943996, 38809984996, 62521251798, 76314338740, 319408651400
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
100 is a term since the 7 even numbers 100, 102, ... 112 are all totient numbers.
|
|
PROG
|
(PARI) m = 7; v = vector(m); for(k=1, m, v[k] = istotient(2*k)); for(k = m+1, 1.5e7, if(Set(v) == [1], print1(2*(k-m), ", ")); v = concat(v[2..m], istotient(2*k)))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|