%I #20 Sep 08 2022 08:46:16
%S 1,2,3,5,6,7,12,14,19,21,27,33,60,61,91,102,535,549,614,695,709,1014,
%T 2448,2519,3464,3511,6348,6841,11009,11177,20754,26610,30651,39246,
%U 122294
%N Numbers k such that 7*10^k + 57 is prime.
%C For k>1, numbers such that the digit 7 followed by k-2 occurrences of the digit 0 followed by the digits 57 is prime (see Example section).
%C a(35) > 2*10^5.
%H Makoto Kamada, <a href="https://stdkmd.net/nrr/prime/primedifficulty.txt">Search for 70w57.</a>
%e 3 is in this sequence because 7*10^3+57 = 7057 is prime.
%e Initial terms and primes associated:
%e a(1) = 1, 127;
%e a(2) = 2, 757;
%e a(3) = 3, 7057;
%e a(4) = 5, 700057;
%e a(5) = 6, 7000057;
%e a(6) = 7, 70000057, etc.
%t Select[Range[0, 100000], PrimeQ[7*10^# + 57] &]
%o (PARI) lista(nn) = {for(n=1, nn, if(ispseudoprime(7*10^n + 57), print1(n, ", ")));} \\ _Altug Alkan_, Mar 27 2016
%o (Magma) [n: n in [1..500] | IsPrime(7*10^n + 57)]; // _Vincenzo Librandi_, Jul 03 2016
%Y Cf. A056654, A268448, A269303, A270339, A270613, A270831, A270890, A270929.
%K nonn,more
%O 1,2
%A _Robert Price_, Mar 27 2016
%E a(35) from _Robert Price_, Jun 13 2019
|