

A302773


Numerators of (3*n + 2)/12.


1



1, 5, 2, 11, 7, 17, 5, 23, 13, 29, 8, 35, 19, 41, 11, 47, 25, 53, 14, 59, 31, 65, 17, 71, 37, 77, 20, 83, 43, 89, 23, 95, 49, 101, 26, 107, 55, 113, 29, 119, 61, 125, 32, 131, 67, 137, 35, 143, 73, 149, 38, 155, 79, 161, 41, 167, 85, 173, 44, 179, 91, 185, 47, 191, 97
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


COMMENTS

Or numerators of (3*n+2)/4.  Altug Alkan, Apr 17 2018


LINKS

Colin Barker, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (0,0,0,2,0,0,0,1).


FORMULA

G.f.: (1 + 5*x + 2*x^2 + 11*x^3 + 5*x^4 + 7*x^5 + x^6 + x^7)/((1  x)^2*(1 + x)^2*(1 + x^2)^2).
a(n) = 2*a(n4)  a(n8).
a(n) = (3*n + 2)*(((1)^n + 1)*(i^(n*(n+1))  5) + 16)/16, where i = sqrt(1).
a(n) = A016789(n)/A109008(n+2).


MATHEMATICA

Table[Numerator[(3 n + 2)/12], {n, 0, 70}]


PROG

(PARI) vector(70, n, n; numerator((3*n+2)/12))
(PARI) Vec((1 + 5*x + 2*x^2 + 11*x^3 + 5*x^4 + 7*x^5 + x^6 + x^7)/((1  x)^2*(1 + x)^2*(1 + x^2)^2) + O(x^60)) \\ Colin Barker, Apr 16 2018
(Sage) [numerator((3*n+2)/12) for n in (0..70)]
(GAP) List([0..70], n > NumeratorRat((3*n+2)/12));
(MAGMA) [Numerator((3*n+2)/12): n in [0..70]];


CROSSREFS

Cf. A016789, A109008.
Cf. A060819: numerators of n/4, with n > 0.
Cf. A176672: numerators of (3*n + 1)/12.
First bisection is A165355; second bisection is A016969.
Sequence in context: A163257 A176624 A131784 * A249369 A065268 A275509
Adjacent sequences: A302770 A302771 A302772 * A302774 A302775 A302776


KEYWORD

nonn,easy,frac


AUTHOR

Bruno Berselli, Apr 13 2018


STATUS

approved



