1,3

Ivan Neretin, Table of n, a(n) for n = 1..10000

a(n) = (A142331(n)-37)/90.

Select[Range[0, 150], PrimeQ[90 # + 37] &] (* Vincenzo Librandi, Apr 07 2015 *)

(PARI) isok(n) = isprime(90*n+37) \\ Michel Marcus, Jul 24 2013

(MAGMA) [n: n in [0..150] | IsPrime(90*n+37)]; // Vincenzo Librandi, Apr 07 2015

Cf. A181732.

Sequence in context: A026512 A308192 A026506 * A173946 A051916 A130216

Adjacent sequences: A198379 A198380 A198381 * A198383 A198384 A198385

nonn,easy

J. W. Helkenberg, Oct 24 2011

approved