%I #29 Jun 09 2024 18:06:16
%S 1,2,5,6,18,23,59,86,115,119,251,365,370,447,1672,3076,3973,5611,7687,
%T 8824,13026,17141,17971,23346,29138,94373,94563,142189,156956,255167,
%U 266731
%N Numbers k such that 7*10^k + 87 is prime.
%C For k > 1, numbers k such that the digit 7 followed by k-2 occurrences of the digit 0 followed by the digits 87 is prime (see Example section).
%C a(32) > 3*10^5.
%H Makoto Kamada, <a href="https://stdkmd.net/nrr">Factorization of near-repdigit-related numbers</a>.
%H Makoto Kamada, <a href="https://stdkmd.net/nrr/prime/prime_difficulty.txt">Search for 70w87</a>.
%e 5 is in this sequence because 7*10^5 + 87 = 700087 is prime.
%e Initial terms and associated primes:
%e a(1) = 1, 157;
%e a(2) = 2, 787;
%e a(3) = 5, 700087;
%e a(4) = 6, 7000087;
%e a(5) = 18, 7000000000000000087, etc.
%t Select[Range[0, 100000], PrimeQ[7*10^# + 87] &]
%o (PARI) is(n)=ispseudoprime(7*10^n + 87) \\ _Charles R Greathouse IV_, Jun 13 2017
%Y Cf. A056654, A268448, A269303, A270339, A270613, A270831, A270890, A270929, A271269.
%K nonn,more
%O 1,2
%A _Robert Price_, Nov 11 2016
%E a(28)-a(29) from _Robert Price_, Jul 27 2019
%E a(30)-a(31) from _Robert Price_, May 31 2023