# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a163678
Showing 1-1 of 1

%I A163678 #12 Sep 08 2022 08:45:47
%S A163678 1913,18379,19013,25013,34613,35879,36979,37379,37813,40013,40213,
%T A163678 45613,48091,49279,51613,55313,56179,56713,58613,63079,63179,64091,
%U A163678 65479,66413,74779,75913,76213,76579,76679,85313,88379,90379,90679,93113
%N A163678 Smaller prime p in Ormiston pairs (p, q) with q - p = 18.
%C A163678 An Ormiston pair (or rearrangement prime pair) is a pair of consecutive primes that use the same digits in a different order.
%H A163678 G. C. Greubel, <a href="/A163678/b163678.txt">Table of n, a(n) for n = 1..5000</a>
%H A163678 Jens Kruse Andersen, <a href="http://primerecords.dk/ormiston_tuples.htm">Ormiston Tuples</a>
%H A163678 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/RearrangementPrimePair.html">Rearrangement Prime Pair</a>
%e A163678 (19013, 19031) is an Ormiston pair with gap 18, so 19013 is in the sequence.
%t A163678 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 *)
%o A163678 (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) ];
%Y A163678 Subsequence of A069567.
%Y A163678 Cf. A072274, A163863.
%K A163678 nonn,base
%O A163678 1,1
%A A163678 _Klaus Brockhaus_, Aug 03 2009
%E A163678 Keyword base added by _Klaus Brockhaus_, Sep 18 2009

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE