login
Numbers k such that 5*10^k + 21 is prime.
0

%I #14 Jun 03 2024 23:31:21

%S 1,2,3,4,7,10,17,22,32,33,39,70,79,97,273,304,905,2474,3523,10348,

%T 15155,22252,22966,70858,82504,90793

%N Numbers k such that 5*10^k + 21 is prime.

%C For k > 1, numbers k such that the digit 5 followed by k-2 occurrences of the digit 0 followed by the digits 21 is prime (see Example section).

%C a(27) > 2*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 50w21</a>.

%e 4 is in this sequence because 5*10^4 + 21 = 50021 is prime.

%e Initial terms and associated primes:

%e a(1) = 1, 71;

%e a(2) = 2, 521;

%e a(3) = 3, 5021;

%e a(4) = 4, 50021;

%e a(5) = 7, 50000021; etc.

%p select(k->isprime(5*10^k+21),[$1..1000]); # _Muniru A Asiru_, Jan 05 2019

%t Select[Range[0, 100000], PrimeQ[5*10^# + 21] &]

%Y Cf. A056654, A268448, A269303, A270339, A270613, A270831, A270890, A270929, A271269.

%K nonn,more,hard

%O 1,2

%A _Robert Price_, Jan 31 2017