1,1
Generating polynomial belongs to the family of irreducible polynomials (or trinomials) of the form x^n+x^(n-1)-1
Do[If[PrimeQ[x^3 + x^2 - 1], Print[x]], {x, 1, 100}]
Cf. A045546, A125882-A125882.
Sequence in context: A050011 A030303 A047315 * A089969 A166944 A073894
Adjacent sequences: A125878 A125879 A125880 * A125882 A125883 A125884
nonn
Artur Jasinski (grafix(AT)csl.pl), Dec 14 2006