A239007 - OEIS

%I #6 Apr 03 2023 10:36:13

%S 4,87,34951,73203,475341523

%N Difference between the smallest 10^n-digit member of a sexy prime pair and 10^(10^n - 1).

%H G. L. Honaker, Jr. and Chris Caldwell, <a href="https://t5k.org/curios/cpage/18952.html">Prime Curios! 10000...34951 (100-digits)</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/SexyPrimes.html">Sexy Primes</a>. [The definition in this webpage is unsatisfactory, because it defines a "sexy prime" as a pair of primes.- _N. J. A. Sloane_, Mar 07 2021]

%t lst = {}; Do[s = 10^(10^n - 1); n = NextPrime[s]; While[! PrimeQ[n + 6], n = NextPrime[n]]; AppendTo[lst, n - s], {n, 0, 2}]; lst

%Y Cf. A023201.

%K nonn,base,hard,more

%O 0,1

%A _Arkadiusz Wesolowski_, Mar 08 2014