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 A267378 #15 Sep 08 2022 08:46:15
%S A267378 7,19,79,607,9907,20599,65287,104659,129967,331207,1047559,1184839,
%T A267378 1872799,3746167,4098607,6762607,7308919,11313139,20146639,21376759,
%U A267378 28392919,43040167,54693427,59961799,84925447,104050207,108232819,131068159,168883027,187375039
%N A267378 Primes of the form k^4 - k^2 + 7.
%C A267378 From _Robert Israel_, Jan 18 2016: (Start)
%C A267378 Subset of A005471.
%C A267378 All terms == 7 or 19 (mod 30). (End)
%e A267378 k = 5: 5^4-5^2+7=607 (is prime).
%p A267378 select(isprime, [seq(x^4-x^2+7,x=1..1000)]); # _Robert Israel_, Jan 18 2016
%t A267378 Select[Table[k^4 - k^2 + 7, {k, 100}], PrimeQ] (* _Michael De Vlieger_, Jan 13 2016 *)
%o A267378 (Magma) [a: n in [1..150] | IsPrime(a) where a is n^4-n^2+7]; // _Vincenzo Librandi_, Jan 15 2016
%o A267378 (PARI) lista(nn) = for(n=1, nn, if(ispseudoprime(p=n^4-n^2+7), print1(p, ", "))); \\ _Altug Alkan_, Jan 15 2016
%Y A267378 Cf. A005471.
%K A267378 nonn,easy
%O A267378 1,1
%A A267378 _Emre APARI_, Jan 13 2016
%E A267378 More terms from _Vincenzo Librandi_, Jan 15 2016