login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A300067 Period 6: repeat [0, 0, 0, 1, 2, 2]. 4
0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2, 0, 0, 0, 1, 2, 2 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,5

COMMENTS

Used for A300068.

LINKS

Table of n, a(n) for n=0..113.

FORMULA

a(n) = floor((n (mod 6))/3) + floor((n (mod 6))/4), n >= 0.

G.f.: x^3*(1 + 2*x + 2*x^2)/(1 - x^6).

a(n) = (5 - 2*cos(n*Pi/3) - 2*cos(2*n*Pi/3) - cos(n*Pi) - 4*sqrt(3)*sin(n*Pi/3))/6. - Wesley Ivan Hurt, Oct 04 2018

MATHEMATICA

PadRight[{}, 102, {0, 0, 0, 1, 2, 2}] (* or *)

CoefficientList[Series[x^3*(1 + 2 x + 2 x^2)/(1 - x^6), {x, 0, 102}], x] (* Michael De Vlieger, Feb 25 2018 *)

PROG

(PARI) a(n) = my(v=[0, 0, 1, 2, 2]); v[if(n%6==0, 1, n%6)] \\ Felix Fröhlich, Feb 24 2018

(PARI) concat(vector(3), Vec(x^3*(1 + 2*x + 2*x^2)/(1 - x^6) + O(x^40))) \\ Felix Fröhlich, Feb 25 2018

CROSSREFS

Cf. A300068.

Sequence in context: A281082 A204421 A131018 * A035395 A116856 A140344

Adjacent sequences:  A300064 A300065 A300066 * A300068 A300069 A300070

KEYWORD

nonn,easy

AUTHOR

Wolfdieter Lang, Feb 24 2018

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 20 05:07 EST 2019. Contains 329323 sequences. (Running on oeis4.)