Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #13 Sep 08 2022 08:45:19
%S 37,47,77,91,139,143,149,163,187,217,241,259,271,281,311,341,371,373,
%T 391,401,409,413,437,463,479,481,493,509,527,547,583,601,619,623,629,
%U 643,679,689,707,709,721,731,743,769,779,811,821,847,881,919,931,973,997,1043,1061,1073,1081,1103
%N Numbers k such that the string 97101k is prime.
%H Harvey P. Dale, <a href="/A108333/b108333.txt">Table of n, a(n) for n = 1..1000</a>
%e k=37 is in the sequence because 97101k =9710137 is prime.
%e k=217 is in the sequence because 97101k =97101217 is prime.
%t Select[Range[1200],PrimeQ[97101*10^IntegerLength[#]+#]&] (* _Harvey P. Dale_, Jan 17 2015 *)
%o (Magma) [ n: n in [1..1750] | IsPrime(Seqint(Intseq(n) cat [1, 0, 1, 7, 9])) ]; // _Vincenzo Librandi_, Feb 02 2011
%Y Cf. A108114.
%K nonn,base
%O 1,1
%A _Parthasarathy Nambi_, Jun 30 2005