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 A177460 #6 Jan 20 2024 16:05:12 %S A177460 0,1,3,2,2,9,5,2,12,5,5,12,2,7,27,4,8,9,13,2,24,5,7,12,2,5,27,4,2,75, %T A177460 19,38,18,11,7,30,2,7,9,2,16,63,7,4,12,25,5,12,16,35,51,2,2,9,13,16, %U A177460 12,17,41,60,20,13,51,8,32,9,5,22,18,35,19,12,22,7,75,34,2,93,11,2,30,25,11 %N A177460 Smallest k such that A000217(n)+k and A000217(n)-k are both prime. %e A177460 3+-0->primes. 6+-1->primes. 10+-3->primes. 15+-2->primes,.. %t A177460 f[n_]:=Block[{k},If[OddQ[n],k=0,k=1];While[ !PrimeQ[n-k]||!PrimeQ[n+k], k+=2];k]; Table[f[n*(n+1)/2],{n,2,5!}] %Y A177460 Cf. A000217, A172989, A172990. %K A177460 nonn %O A177460 2,3 %A A177460 _Vladimir Joseph Stephan Orlovsky_, May 09 2010 %E A177460 Definition rephrased and offset adapted by _R. J. Mathar_, Aug 15 2010