1,1
Do[If[PrimeQ[x^12 + x^11 - 1], Print[x]], {x, 1, 400}]
Cf. A000040, A045546, A125881-A125885, A125965-A125973.
Sequence in context: A002580 A091656 A133508 this_sequence A070240 A007369 A100530
Adjacent sequences: A125966 A125967 A125968 this_sequence A125970 A125971 A125972
nonn
Artur Jasinski (grafix(AT)csl.pl), Dec 14 2006
Search completed in 0.002 seconds