Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A097362
a(n) = (n+1)/2 if n is odd, n+2 otherwise.
4
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, 30, 15, 32, 16, 34, 17, 36, 18, 38, 19, 40, 20, 42, 21, 44, 22, 46, 23, 48, 24, 50, 25, 52, 26, 54, 27, 56, 28, 58, 29, 60, 30, 62, 31, 64, 32, 66, 33, 68, 34, 70, 35, 72, 36, 74, 37
OFFSET
1,2
COMMENTS
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}.
FORMULA
G.f.: (2 + x)/(1 - x^2)^2. - Arkadiusz Wesolowski, Dec 28 2011
MATHEMATICA
a[n_] := If[OddQ[n], (n + 1)/2, n + 2]; Table[a[n], {n, 100}] (* Stefan Steinerberger, May 13 2006 *)
LinearRecurrence[{0, 2, 0, -1}, {1, 4, 2, 6}, 100] (* Harvey P. Dale, Sep 14 2016 *)
PROG
(PARI) a(n)=if(n%2, (n+1)/2, n+2) \\ Charles R Greathouse IV, Sep 02 2015
CROSSREFS
Cf. A065423.
Sequence in context: A370831 A297307 A163238 * A129131 A237056 A285296
KEYWORD
easy,nonn
AUTHOR
Pierre CAMI, Sep 18 2004
EXTENSIONS
More terms from Stefan Steinerberger, May 13 2006
STATUS
approved