This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A216974 #18 Dec 24 2022 11:38:59 %S A216974 0,1,3,9,15,21,45,57,63,69,87,99,129,141,279,285,333,345,453,459,465, %T A216974 471,513,519,627,657,669,693,729,771,777,783,795,801,807,873,909,921, %U A216974 933,969,987,1011,1023,1047,1119,1155,1257,1299,1323,1407,1419,1437,1485 %N A216974 Numbers k such that k^4+2 is prime. %H A216974 Charles R Greathouse IV, <a href="/A216974/b216974.txt">Table of n, a(n) for n = 1..10000</a> %t A216974 lst={}; Do[If[PrimeQ[n^4+2], AppendTo[lst, n]], {n, 0, 10^3}]; lst %t A216974 Select[Range[0, 1500], PrimeQ[#^4 + 2] &] (* _Bruno Berselli_, Sep 21 2012 *) %o A216974 (PARI) select(n->isprime(n^4+2),vector(2000,n,n-1)) /* _Joerg Arndt_, Sep 21 2012 */ %o A216974 (Magma) [n: n in [0..1500] | IsPrime(n^4+2)]; // _Bruno Berselli_, Sep 21 2012 %Y A216974 Cf. A067200, A067201, A182343 (associated primes). %K A216974 nonn,easy %O A216974 1,3 %A A216974 _Michel Lagneau_, Sep 21 2012