A177091 - OEIS

%I #6 Sep 08 2022 08:45:53

%S 3,8,10,12,14,15,17,18,19,21,22,24,25,27,28,29,30,31,32,33,34,35,36,

%T 37,38,41,43,45,46,47,48,49,51,52,54,56,58,59,62,63,64,65,66,67,69,70,

%U 72,73,74,75,76,78,80,81,83,84,85,86,87,88,89,90,91,93,94,95,96,97,98,99

%N Numbers n such that n^4-n-1 is not prime.

%H Vincenzo Librandi, <a href="/A177091/b177091.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Range[2, 100], !PrimeQ[#^4 - # - 1] &] (* _Vincenzo Librandi_, Oct 15 2012 *)

%o (Magma) [n: n in [2..100] |not IsPrime(n^4 - n - 1)]; // _Vincenzo Librandi_, Oct 15 2012

%Y Cf. A126424 (Numbers n for which n^4-n-1 is prime)

%K nonn,easy

%O 1,1

%A _Vincenzo Librandi_, Jun 25 2010