OFFSET
1,2
COMMENTS
For all elements of this sequence there are no (x,y) positive integers such that a(n)=6*x*y+x+y or a(n)=6*x*y-x-y. - Pedro Caceres, Apr 19 2019
LINKS
Ray Chandler, Table of n, a(n) for n = 1..10000 (first 1000 terms from T. D. Noe)
FORMULA
a(n) = (A002476(n)-1)/6. - Zak Seidov, Aug 31 2016
MAPLE
a := [ ]: for n from 0 to 400 do if isprime(6*n+1) then a := [ op(a), n ]; fi; od: A002476 := n->a[n];
MATHEMATICA
Select[Range@ 140, PrimeQ[6 # + 1] &] (* Michael De Vlieger, Jan 23 2018 *)
PROG
(Magma) [n: n in [0..200]| IsPrime(6*n+1)] // Vincenzo Librandi, Nov 20 2010
(PARI) select(n->n%6==1, primes(100))\6 \\ Charles R Greathouse IV, Apr 28 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved