OFFSET
0,3
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (0,0,0,2,0,0,0,-1).
FORMULA
G.f.: x*(1+2x+2x^2+6x^3+2x^4+x^5+x^6)/((1-x)^2*(1+x)^2*(1+x^2)^2).
E.g.f.: ((2 + 6*x)*cosh(x) - 2*cos(x) + (2 - 3*x)*sin(x) + 9*x*sinh(x))/8. - Stefano Spezia, Aug 13 2024
MAPLE
A028390 := proc(n) if 3*n mod 4 = 0 then 3*n/2 else round(3*n/4); fi; end;
MATHEMATICA
Table[If[Divisible[3*n, 4], 3*n/2, Floor[3*n/4 + 1/2]], {n, 0, 100}] (* Paolo Xausa, Aug 13 2024 *)
PROG
(PARI) a(n)=if(Mod(3*n, 4) == 0, (3*n/2), round(3*n/4)); vector(100, n, a(n))
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
More terms from Jason Earls, Jul 13 2001
STATUS
approved