A074668 Differences between successive 7-digit distinct-digit primes.

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

Author

Zak Seidov, Aug 30 2002

Keywords

• fini
• nonn
• base

Examples

			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.
		

Crossrefs

The seven-digit distinct-digit primes are in A074667.

Programs

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}]]