login
A074668
Differences between successive 7-digit distinct-digit primes.
10
20, 210, 72, 88, 90, 410, 22, 200, 10, 104, 4, 86, 70, 104, 6, 24, 360, 136, 210, 56, 40, 50, 34, 24, 462, 80, 18, 22, 68, 36, 4, 6, 254, 6, 6, 84, 4, 512, 24, 6, 4, 56, 94, 50, 160, 584, 36, 6, 90, 10, 18, 50, 102, 204, 4, 510, 6, 14, 60, 16, 20, 60, 4, 6
OFFSET
1,1
EXAMPLE
a(1)=20 & a(2)=210 because first three 7-digit distinct-digit primes are 1023467, 1023487, 1023697 and differences between them are 20 and 210.
MATHEMATICA
a=1023451; b=a+8000; se7 = Select[Range[a, b, 2], Length[Union[IntegerDigits[ # ]]] == 7 && PrimeQ[ # ] & ]; Flatten[Table[{se7[[i+1]]-se7[[i]]}, {i, Length[se7]-1}]]
CROSSREFS
The seven-digit distinct-digit primes are in A074667.
Sequence in context: A161513 A162359 A161880 * A139620 A094311 A353895
KEYWORD
fini,nonn,base
AUTHOR
Zak Seidov, Aug 30 2002
STATUS
approved