|
%I #13 May 08 2018 03:17:27
%S 91,115,117,119,121,141,143,183,185,201,203,205,213,215,217,243,245,
%T 285,287,295,297,299,301,319,321,323,325,339,341,361,391,403,411,413,
%U 423,425,451,469,471,473,481,493,511,513,515,525,527,529,531,533,535,549
%N Numbers n with property that three consecutive odd numbers {n,n+2,n+4} are all composite.
%e 143 is in the sequence because 143=11*13, 145=5*29, 147=3*49. [_Emeric Deutsch_, Jun 27 2009]
%p a:= proc(n) if not (isprime(2*n-1) or isprime(2*n+1) or isprime(2*n+3)) then 2*n-1 end if end proc: seq(a(n), n = 2 .. 300); # _Emeric Deutsch_, Jun 27 2009
%t fQ[n_]:=!PrimeQ[n]&&!PrimeQ[n+2]&&!PrimeQ[n+4];Select[Range[3,1000,2],fQ] (* _Vladimir Joseph Stephan Orlovsky_, Apr 16 2011 *)
%K nonn
%O 1,1
%A _Zak Seidov_, Jun 22 2009
|
