cp's OEIS Frontend

A163680 Smaller prime p in Ormiston pairs (p, q) with q - p = 54.

%I A163680 #10 Feb 16 2025 08:33:11
%S A163680 35617,40639,359783,502339,552917,580417,668417,719839,807017,824339,
%T A163680 833117,861239,909917,961339,987739,1078417,1145539,1168639,1185017,
%U A163680 1196539,1220839,1313239,1479617,1497439,1710439,1710539,1732139
%N A163680 Smaller prime p in Ormiston pairs (p, q) with q - p = 54.
%C A163680 An Ormiston pair (or rearrangement prime pair) is a pair of consecutive primes that use the same digits in a different order.
%H A163680 Harvey P. Dale, <a href="/A163680/b163680.txt">Table of n, a(n) for n = 1..1000</a>
%H A163680 Jens Kruse Andersen, <a href="http://primerecords.dk/ormiston_tuples.htm">Ormiston Tuples</a>
%H A163680 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/RearrangementPrimePair.html">Rearrangement Prime Pair</a>
%e A163680 (359783, 359837) is an Ormiston pair with gap 54, so 359783 is in the sequence.
%t A163680 op54Q[{a_,b_}]:=Sort[IntegerDigits[a]]==Sort[IntegerDigits[b]] && b-a==54; Transpose[Select[Partition[Prime[Range[150000]],2,1],op54Q]][[1]] (* _Harvey P. Dale_, Jun 16 2014 *)
%o A163680 (Magma) [ p: p in PrimesUpTo(1750000) | q-p eq 54 and a eq b where a is Sort(Intseq(p)) where b is Sort(Intseq(q)) where q is NextPrime(p) ];
%Y A163680 Subsequence of A069567.
%Y A163680 Cf. A072274, A163863.
%K A163680 nonn,base
%O A163680 1,1
%A A163680 _Klaus Brockhaus_, Aug 03 2009
%E A163680 Keyword base added by _Klaus Brockhaus_, Sep 18 2009