%I A105133
%S A105133 0,1,3,4,6,7,12,13,18,19,21,22,24,28,33,34,36,39,43,46,48,49,52,57,63,
67,
%T A105133 69,76,81,82,84,87,88,91,94,96,99,102,103,106,109,117,124,126,127,132,
133,
%U A105133 136,138,139,147,151,153,154,159,162,171,172,178,181,186,193,199,201,202
%N A105133 Numbers n such that 8n+5 is prime.
%p A105133 M:=500; f:=proc(n) local t1,t2; t1:=[]; for k from 0 to M do t2:=2^n*k+2^(n-1)+1;
if isprime(t2) then t1:=[op(t1),k]; fi; od; t1; end; f(3);
%t A105133 lst={};Do[If[PrimeQ[8*n+5], AppendTo[lst, n]], {n, 13^3}];lst [From Vladimir
Orlovsky (4vladimir(AT)gmail.com), Sep 08 2008]
%Y A105133 Cf. A095278, A105134-A105140, A002145, A007521, A105126-A105132.
%Y A105133 Sequence in context: A060965 A153883 A033162 this_sequence A002982 A093707
A058639
%Y A105133 Adjacent sequences: A105130 A105131 A105132 this_sequence A105134 A105135
A105136
%K A105133 nonn
%O A105133 1,3
%A A105133 N. J. A. Sloane (njas(AT)research.att.com), based on correspondence from
Marco Matosic (marcomatosic(AT)hotmail.com), Apr 11 2005
|