1,2

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Select[Range[100], !PrimeQ[13 # + 3] &]

(Magma) [n: n in [0..90] | not IsPrime(13*n + 3)]; // Vincenzo Librandi, Oct 15 2012

Cf. A100202, A155853.

Sequence in context: A194276 A184336 A183300 * A047252 A039235 A247782

Adjacent sequences: A155851 A155852 A155853 * A155855 A155856 A155857

nonn,easy

Vincenzo Librandi, Jan 29 2009

Data corrected by Harvey P. Dale, Sep 11 2011

approved