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 A179437 #16 Jan 28 2023 12:16:28
%S A179437 0,1,1,1,1,1,3,3,5,9,9,13,15,15,17,21,25,25,29,31,31,35,37,41,47,49,
%T A179437 49,51,51,53,65,67,71,71,79,79,83,87,89,93,97,97,105,105,107,107,117,
%U A179437 127,129,129,131,135,135,143,147,151,155,155,159,161,161,169,181,183,183,185,197
%N A179437 a(n) = |2n - prime(n)|.
%H A179437 Vincenzo Librandi, <a href="/A179437/b179437.txt">Table of n, a(n) for n = 1..1000</a>
%F A179437 a(n) = prime(n) - 2*n for n != 2, 3, 4; a(n) = 1 otherwise. - _Jianing Song_, Jan 15 2023
%t A179437 Table[Abs[2 n - Prime[n]], {n, 1, 100}] (* _Vincenzo Librandi_, Aug 26 2014 *)
%o A179437 (PARI) a(n)=abs(2*n-prime(n)) \\ _Charles R Greathouse IV_, Aug 25 2014
%o A179437 (Magma) [Abs(2*n-NthPrime(n)): n in [1..70]]; // _Vincenzo Librandi_, Aug 26 2014
%Y A179437 A variant of A173072. Cf. A000040.
%K A179437 nonn,easy
%O A179437 1,7
%A A179437 _Odimar Fabeny_, Jul 14 2010
%E A179437 More terms from _N. J. A. Sloane_, Jul 14 2010