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 A097362 #25 Jun 20 2017 01:35:15 %S A097362 1,4,2,6,3,8,4,10,5,12,6,14,7,16,8,18,9,20,10,22,11,24,12,26,13,28,14, %T A097362 30,15,32,16,34,17,36,18,38,19,40,20,42,21,44,22,46,23,48,24,50,25,52, %U A097362 26,54,27,56,28,58,29,60,30,62,31,64,32,66,33,68,34,70,35,72,36,74,37 %N A097362 a(n) = (n+1)/2 if n is odd, n+2 otherwise. %C A097362 May be regarded as table T(n,j) for j=1 to 2, where T(n,1)=n, T(n,2)=2*n+2 T(n,1)=number of carbon atoms in alkane hydrocarbons C_n H_{2n+2}, T(n,2)=number of hydrogen atoms in alkane hydrocarbons C_nH_{2n+2}. %H A097362 Arkadiusz Wesolowski, <a href="/A097362/b097362.txt">Table of n, a(n) for n = 1..10000</a> %H A097362 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,2,0,-1). %F A097362 G.f.: (2 + x)/(1 - x^2)^2. - _Arkadiusz Wesolowski_, Dec 28 2011 %t A097362 a[n_] := If[OddQ[n], (n + 1)/2, n + 2]; Table[a[n], {n, 100}] (* _Stefan Steinerberger_, May 13 2006 *) %t A097362 LinearRecurrence[{0,2,0,-1},{1,4,2,6},100] (* _Harvey P. Dale_, Sep 14 2016 *) %o A097362 (PARI) a(n)=if(n%2,(n+1)/2,n+2) \\ _Charles R Greathouse IV_, Sep 02 2015 %Y A097362 Cf. A065423. %K A097362 easy,nonn %O A097362 1,2 %A A097362 _Pierre CAMI_, Sep 18 2004 %E A097362 More terms from _Stefan Steinerberger_, May 13 2006