PROG
(MAGMAMagma) [n: n in [0..130] | not IsPrime(2*n^2+2*n+1) and not IsPrime(3*n^2+6*n+5) and not IsPrime(6*n^2+30*n+55)]; // Vincenzo Librandi, Apr 01 2015
(MAGMAMagma) [n: n in [0..130] | not IsPrime(2*n^2+2*n+1) and not IsPrime(3*n^2+6*n+5) and not IsPrime(6*n^2+30*n+55)]; // Vincenzo Librandi, Apr 01 2015
editing
approved
proposed
editing
editing
proposed
Select[Range[200], AllTrue[{2#^2+2#+1, 3#^2+6#+5, 6#^2+30#+55}, CompositeQ]&] (* Requires Mathematica version 10 or later *) (* __Harvey P. Dale_, Jul 15 2021 *)
Select[Range[200], AllTrue[{2#^2+2#+1, 3#^2+6#+5, 6#^2+30#+55}, CompositeQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 15 2021 *)
approved
editing
proposed
approved
editing
proposed
proposed
approved