OFFSET
1,1
COMMENTS
The first 5 terms are primes of the form 6k+5.
a(17) has 1559 digits and a(18) > 10^3000, if it exists. - Giovanni Resta, Sep 15 2017
EXAMPLE
83 is a term as 2*83+1=167 (prime), 2*83+3=169=(13)^2 (square), and 2*83+5=171 (triangular).
MATHEMATICA
Select[Range[10^11], PrimeQ[2#+1] && IntegerQ@Sqrt[2#+3]&& OddQ@Sqrt[8(2#+5)+1]&]
PROG
(PARI) for(n=1, 10^11, isprime(2*n+1) && issquare(2*n+3)&& ispolygonal(2*n+5, 3) && print1(n", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Waldemar Puszkarz, Sep 14 2017
EXTENSIONS
a(6)-a(9) from Giovanni Resta, Sep 15 2017
STATUS
approved