OFFSET
1,1
COMMENTS
T = A000073 is defined by T(n+1) = T(n) + T(n-1) + T(n-2), T(2) = 1, T(1) = T(0) = 0.
The largest terms correspond to unproven probable primes T(a(n)).
MATHEMATICA
-1 + Position[LinearRecurrence[{1, 1, 1}, {0, 0, 1}, 10^4], _?PrimeQ][[All, 1]] (* Michael De Vlieger, Apr 21 2018 *)
PROG
(PARI) a(n, N=4, S=vector(N, i, i>N-2))={for(i=N, oo, ispseudoprime(S[i%N+1]=2*S[(i-1)%N+1]-S[i%N+1])&&!n--&&return(i))}
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
M. F. Hasler, Apr 18 2018
STATUS
approved