|
|
A074666
|
|
Differences between successive 8-digit distinct digit primes.
|
|
11
|
|
|
170, 138, 750, 102, 118, 680, 310, 992, 618, 130, 50, 112, 198, 530, 100, 260, 3720, 90, 102, 10, 98, 30, 1500, 240, 156, 46, 24, 110, 414, 196, 200, 114, 642, 24, 120, 10, 170, 6, 24, 90, 384, 12, 274, 6, 278, 430, 20, 150, 30, 6, 280, 3644, 190, 182, 118, 380
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(1)=170 because first two 8-digit distinct-digit primes are 10234589 and 10234759 and difference between them is 170.
|
|
MATHEMATICA
|
se=Select[Range[10234589, 98765431, 2], Length[Union[IntegerDigits[ # ]]]==8 &&PrimeQ[ # ]&]; Flatten[Table[{se[[i+1]]-se[[i]]}, {i, 90510}]]
Differences[Select[Prime[Range[679128, 685000]], Length[Union[ IntegerDigits[#]]] == 8&]] (* Harvey P. Dale, Nov 12 2014 *)
|
|
CROSSREFS
|
The eight-digit distinct-digit primes are in A074665.
|
|
KEYWORD
|
fini,full,nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|