%I A125884
%S A125884 3,4,5,8,9,16,18,30,34,36,41,48,49,51,54,61,65,69,76,81,86,89,90,95,101,
%T A125884 109,120,141,170,171,178,196
%N A125884 Numbers n for which n^6+n^5-1 is prime.
%p A125884 Do[If[PrimeQ[x^6 + x^5 - 1], Print[x]], {x, 1, 200}]
%Y A125884 Cf. A000040, A045546, A125881-A125885.
%Y A125884 Sequence in context: A050070 A050590 A066906 this_sequence A001602 A087012 
               A047366
%Y A125884 Adjacent sequences: A125881 A125882 A125883 this_sequence A125885 A125886 
               A125887
%K A125884 nonn
%O A125884 1,1
%A A125884 Artur Jasinski (grafix(AT)csl.pl), Dec 14 2006