OFFSET
1,3
COMMENTS
Could be generated from A045751 by removing all odd terms there, then halving each remaining term. - R. J. Mathar, Jun 08 2007
MAPLE
isA127260 := proc(n) not isprime(8*n+1) ; end: for n from 0 to 200 do if isA127260(n) then printf("%d, ", n) ; fi ; od ; # R. J. Mathar, Jun 08 2007
MATHEMATICA
a = Flatten[Table[If[PrimeQ[8*n + 1] == False, n, {}], {n, 0, 50}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, May 17 2007
EXTENSIONS
More terms from R. J. Mathar, Jun 08 2007
STATUS
approved