A144134 Primes of the form GegenbauerC[n,2,3].

62527434837271029229

Offset

1,1

Comments

No other terms < 10^10000. - Robert Israel, Apr 27 2020

Links

Table of n, a(n) for n=1..1.

Index entries for one-term sequences

Maple

f:= gfun:-rectoproc({(-n - 3)*a(n + 3) + (24 + 6*n)*a(n + 2) + (-5 - n)*a(n + 1), a(0) = 1, a(1) = 12, a(2) = 106}, a(n), remember):
select(isprime, map(f, [$0..4000])); # Robert Israel, Apr 27 2020

Mathematica

lst={}; Do[p=GegenbauerC[n, 2, 3]; If[PrimeQ[p], AppendTo[lst, p]], {n, 15^3}]; lst
Select[GegenbauerC[Range[25], 2, 3], PrimeQ] (* Harvey P. Dale, Dec 04 2022 *)

Crossrefs

Primes in A144133.

Sequence in context: A104283 A003852 A003845 * A172577 A276972 A280298

Adjacent sequences: A144131 A144132 A144133 * A144135 A144136 A144137

Keyword

nonn,bref

Author

Vladimir Joseph Stephan Orlovsky, Sep 11 2008

Status

approved