%I #16 Jun 29 2018 04:00:28

%S 101,401,601,701,1201,1301,1601,1801,1901,2801,3001,3301,3701,4001,

%T 4201,4801,5101,5501,5701,5801,6101,6301,6701,7001,7901,8101,8501,

%U 9001,9601,9901,10301,10501,10601,11701,11801,12101,12301,12401,12601,13001

%N Primes of form 100k + 1.

%D W. Dunham, Euler: The Master of Us All, The Mathematical Association of America, Washington, D.C., 1999, pp. 78.

%H Harry J. Smith, <a href="/A062800/b062800.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[100*Range[200]+1,PrimeQ] (* _Harvey P. Dale_, May 06 2018 *)

%o (PARI) j=[]; for(n=1,400, if(isprime(100*n+1),j=concat(j,100*n+1))); j

%o (PARI) { n=0; for (m=1, 10^9, if (isprime(a=100*m + 1), write("b062800.txt", n++, " ", a); if (n==1000, break)) ) } \\ _Harry J. Smith_, Aug 11 2009

%Y Subsequence of primes of A158128.

%K easy,nonn

%O 1,1

%A _Jason Earls_, Jul 19 2001