1,1
Do[If[PrimeQ[x^5 + x^4 - 1], Print[x]], {x, 1, 200}]
Cf. A000040, A045546, A125881-A125885.
Adjacent sequences: A125880 A125881 A125882 this_sequence A125884 A125885 A125886
Sequence in context: A138830 A122077 A029924 this_sequence A022848 A020904 A043000
nonn
Artur Jasinski (grafix(AT)csl.pl), Dec 14 2006
Search completed in 0.002 seconds