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 A176624 #10 Sep 08 2022 08:45:52 %S A176624 1,5,2,11,6,19,10,27,14,39,20,49,28,57,32,69,42,79,48,91,52,101,60, %T A176624 113,72,127,76,135,80,143,96,163,104,173,114,187,120,201,128,213,138, %U A176624 223,148,237,152,245,164,271,178,279,182,291,188,305,202,319,212,329,218 %N A176624 a(n) = prime(n) + n*(-1)^n. %H A176624 G. C. Greubel, <a href="/A176624/b176624.txt">Table of n, a(n) for n = 1..1000</a> %F A176624 a(n) = A000040(n) + A038608(n+1). %e A176624 a(1)=1 because prime(1) + 1*(-1)^1 = 1. %p A176624 A176624 := proc(n) ithprime(n)+n*(-1)^n ; end proc: seq(A176624(n),n=1..120) ; # _R. J. Mathar_, Apr 27 2010 %t A176624 Table[Prime[n]+(-1)^n*n, {n,60}] (* _G. C. Greubel_, Jul 01 2021 *) %o A176624 (Magma) [NthPrime(n) +(-1)^n*n: n in [1..60]]; // _G. C. Greubel_, Jul 01 2021 %o A176624 (Sage) [nth_prime(n) +(-1)^n*n for n in (1..60)] # _G. C. Greubel_, Jul 01 2021 %Y A176624 Cf. A000040, A038608, A176628. %K A176624 nonn %O A176624 1,2 %A A176624 _Juri-Stepan Gerasimov_, Apr 22 2010 %E A176624 Entries checked by _R. J. Mathar_, Apr 27 2010