|
%I #11 Sep 08 2022 08:45:34
%S 9,51,65,93,121,135,177,205,219,247,261,275,289,303,345,387,415,429,
%T 471,485,513,527,555,583,597,611,625,639,667,681,695,723,737,765,779,
%U 793,807,835,849,891,905,933,961,975,989,1003,1017,1045,1059,1073,1101,1115
%N Composites of the form 14k + 9.
%t Select[14*Range[0,100]+9,CompositeQ] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Apr 28 2018 *)
%o (Magma) [(14*n+9): n in [0..100]|not IsPrime(14*n+9)] // _Vincenzo Librandi_, Dec 18 2010
%Y Cf. A045392.
%K nonn,less
%O 1,1
%A _Juri-Stepan Gerasimov_, Jun 13 2008
%E Edited by _R. J. Mathar_, Jun 16 2008
|
