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 A076273 #21 Nov 05 2023 10:20:02 %S A076273 1,2,4,7,11,17,23,29,35,41,51,59,67,77,83,89,99,111,119,127,137,143, %T A076273 151,161,171,185,197,203,209,215,221,239,257,267,275,287,299,307,319, %U A076273 329,339,351,359,371,383,389,395,409,433,449,455,461,471,479,491,507,519,531 %N A076273 a(0) = 1, a(1) = 2; for n>1, a(n) = prime(n)+prime(n-1)-1. %C A076273 Least m such that A076272(m) > A076272(m-1) for n>0; a(0)=1. %C A076273 A076272(a(k)+j) = A008578(k) for k>0 and 0<=j < A075527(k-1). %H A076273 Harvey P. Dale, <a href="/A076273/b076273.txt">Table of n, a(n) for n = 0..1000</a> %F A076273 a(n) = A001043(n-1)-1, n>1. - _R. J. Mathar_, Jun 04 2020 %t A076273 nxt[{a_,b_}]:={a+1,Prime[a+1]+Prime[a]-1}; Join[{1},Transpose[ NestList[ nxt,{1,2},60]][[2]]] (* or *) Join[{1,2},Total/@Partition[Prime[ Range[ 60]],2,1]-1] (* _Harvey P. Dale_, Jun 12 2012 *) %o A076273 (PARI) a(n)=if(n<1,1,if(n==1,2,prime(n)+prime(n-1)-1)) \\ Lambert Klasen, Jan 14 2005; corrected by _Michel Marcus_, Nov 05 2023 %Y A076273 Cf. A001043. %K A076273 nonn,easy %O A076273 0,2 %A A076273 _Reinhard Zumkeller_, Oct 04 2002 %E A076273 Simpler description from _Vladeta Jovovic_, Mar 29 2003 %E A076273 More terms from Lambert Klasen (lambert.klasen(AT)gmx.de), Jan 14 2005