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 A089376 #18 Sep 08 2022 08:45:12
%S A089376 7,37,67,127,151,337,457,547,751,1051,1117,1327,1801,2251,2347,2647,
%T A089376 2857,3187,3301,4027,5107,6637,6967,7477,8737,9697,10501,11551,13567,
%U A089376 17551,21751,23251,23557,25117,28051,28387,30097,31147,33301,35527
%N A089376 Primes of the form k^2 - 7*k + 7.
%D A089376 M. Cerasoli, F. Eugeni and M. Protasi, Elementi di Matematica Discreta, Bologna, 1988.
%D A089376 Emanuele Munarini and Norma Zagaglia Salvi, Matematica Discreta, UTET, CittaStudiEdizioni, Milano, 1997.
%H A089376 Vincenzo Librandi, <a href="/A089376/b089376.txt">Table of n, a(n) for n = 1..5000</a>
%F A089376 a(n) = A089373(n)^2 - 7*A089373(n) + 7. - _David Wasserman_, Sep 15 2005
%p A089376 select(isprime,[k^2-7*k+7$k=1..250]); # _Muniru A Asiru_, Nov 24 2018
%t A089376 Select[Table[n^2-7n+7,{n,6,1000}],PrimeQ] (* _Vincenzo Librandi_, Dec 12 2011 *)
%o A089376 (Magma) [a: n in [6..200] | IsPrime(a) where a is n^2 - 7*n + 7]; // _Vincenzo Librandi_, Dec 12 2011
%Y A089376 Cf. A089373 (corresponding k).
%K A089376 nonn,easy
%O A089376 1,1
%A A089376 _Giovanni Teofilatto_, Dec 27 2003
%E A089376 More terms from _David Wasserman_, Sep 15 2005