A163678 Smaller prime p in Ormiston pairs (p, q) with q - p = 18.

1913, 18379, 19013, 25013, 34613, 35879, 36979, 37379, 37813, 40013, 40213, 45613, 48091, 49279, 51613, 55313, 56179, 56713, 58613, 63079, 63179, 64091, 65479, 66413, 74779, 75913, 76213, 76579, 76679, 85313, 88379, 90379, 90679, 93113

Offset

1,1

Comments

An Ormiston pair (or rearrangement prime pair) is a pair of consecutive primes that use the same digits in a different order.

Links

G. C. Greubel, Table of n, a(n) for n = 1..5000

Jens Kruse Andersen, Ormiston Tuples

Eric Weisstein's World of Mathematics, Rearrangement Prime Pair

Example

(19013, 19031) is an Ormiston pair with gap 18, so 19013 is in the sequence.

Mathematica

Transpose[Select[Select[Partition[Prime[Range[10000]], 2, 1], Last[#] - First[#] == 18 &], Sort[IntegerDigits[First[#]]] == Sort[IntegerDigits[Last[#]]] &]][[1]] (* G. C. Greubel, Aug 02 2017 *)

Prog

(Magma) [ p: p in PrimesUpTo(100000) | q-p eq 18 and a eq b where a is Sort(Intseq(p)) where b is Sort(Intseq(q)) where q is NextPrime(p) ];

Crossrefs

Subsequence of A069567.

Cf. A072274, A163863.

Sequence in context: A168499 A230083 A069567 * A175517 A163863 A251917

Adjacent sequences: A163675 A163676 A163677 * A163679 A163680 A163681

Keyword

nonn,base

Author

Klaus Brockhaus, Aug 03 2009

Extensions

Keyword base added by Klaus Brockhaus, Sep 18 2009

Status

approved