A074674 Differences between successive four-digit distinct-digit primes.

10, 14, 6, 18, 6, 4, 140, 12, 10, 20, 4, 6, 8, 10, 20, 40, 42, 14, 4, 2, 10, 14, 6, 24, 4, 2, 4, 30, 20, 6, 18, 12, 4, 14, 10, 2, 18, 10, 20, 36, 4, 12, 14, 30, 6, 24, 6, 34, 24, 20, 6, 6, 28, 66, 14, 30, 22, 14, 10, 6, 12, 2, 4, 2, 48, 6, 10, 26, 130, 32, 6, 4, 6, 14, 10, 8, 28, 20, 22

Offset

1,1

Comments

There are exactly 510 four-digit primes with all distinct digits, so the sequence of differences is finite as well.

Links

Harvey P. Dale, Table of n, a(n) for n = 1..509

Example

a(1)=10 because the first and second four-digit primes with all distinct digits are 1039, 1049 and difference between them is 10.

Mathematica

se=Select[Range[1039, 9871, 2], Length[Union[IntegerDigits[ # ]]]==4&&PrimeQ[ # ]&]; Flatten[Table[{se[[i+1]]-se[[i]]}, {i, 509}]]
Differences[Select[Prime[Range[169, 1229]], Length[Union[ IntegerDigits[#]]] == 4&]] (* Harvey P. Dale, Oct 11 2015 *)

Crossrefs

The first differences of the A074673. For 3-digit distinct-digit primes, see A074675, A074676. For 5-digit distinct-digit primes, see A074671, A074672. For 6-digit distinct-digit primes, see A074669, A074670. For 7-digit distinct-digit primes, see A074667, A074668. For 8-digit distinct-digit primes, see A074665, A074666.

Sequence in context: A053612 A072146 A332440 * A241041 A335169 A164936

Adjacent sequences: A074671 A074672 A074673 * A074675 A074676 A074677

Keyword

fini,full,nonn,base

Author

Zak Seidov, Aug 30 2002

Status

approved