|
|
A092836
|
|
Prime tribonacci numbers.
|
|
9
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The next term has 212 digits and is too large to fit. - Harvey P. Dale, Oct 08 2017
These primes are A000073(k) at k = 4, 6, 7, 11, 87, 98, 215, 802, 4202, ... The indices in A092835 are off by one. - R. J. Mathar, Dec 14 2011
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[LinearRecurrence[{1, 1, 1}, {0, 0, 1}, 1000], PrimeQ] (* Harvey P. Dale, Oct 08 2017 *)
|
|
PROG
|
(PARI) t(m)= { if (m==0, return(a1)); if (m==1, return(a2)); if (m==2, return(a3)); r = a1 + a2 + a3; a1=a2; a2=a3; a3=r; return(r); } { a1=0; a2=1; a3=1; n=0; for (m=0, 1000, a=t(m); if (isprime(a), write("b092836.txt", n++, " ", a))); } \\ Harry J. Smith, Jun 21 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|