login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 59th year, we have over 358,000 sequences, and we’ve crossed 10,300 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A165190 G.f.: 1/((1-x^4)*(1-x^5)). 3
1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 2, 2, 2, 3, 3, 2, 2, 3, 3, 3, 2, 3, 3, 3, 3, 3, 3, 3, 3, 4, 3, 3, 3, 4, 4, 3, 3, 4, 4, 4, 3, 4, 4, 4, 4, 4, 4, 4, 4, 5, 4, 4, 4, 5, 5, 4, 4, 5, 5, 5, 4, 5, 5, 5, 5, 5, 5, 5, 5, 6, 5, 5, 5, 6 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,21

COMMENTS

A121262 convolved with A079998. The two sequences have very simple generating functions and can be mapped to the numeric partitions 4=4 and 5=5 respectively.

Number of partitions of n into parts 4 and 5. - Joerg Arndt, Aug 28 2015

LINKS

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

Index to Molien series

Index entries for linear recurrences with constant coefficients, signature (0,0,0,1,1,0,0,0,-1).

FORMULA

1 followed by the Euler transform of the finite sequence [0,0,0,1,1].

G.f.: 1/((1-x)^2*(1+x)*(1+x^2)*(1+x+x^2+x^3+x^4)). [R. J. Mathar, Oct 07 2009]

a(n) = A117444(n+2)/5 + n/20 + 9/40 + (-1)^n/8 + A057077(n)/4. [R. J. Mathar, Oct 07 2009]

a(0)=1, a(1)=0, a(2)=0, a(3)=0, a(4)=1, a(5)=1, a(6)=0, a(7)=0, a(8)=1, a(n) = a(n-4)+a(n-5)-a(n-9), n>8. - Harvey P. Dale, Aug 16 2012

a(n) = floor((n+4)/4) - floor((n+4)/5). - Wesley Ivan Hurt, Aug 27 2015

a(n)+a(n-2) = A008616(n). - R. J. Mathar, Jun 23 2021

MAPLE

A165190:=n->floor((n+4)/4) - floor((n+4)/5): seq(A165190(n), n=0..100); # Wesley Ivan Hurt, Aug 27 2015

MATHEMATICA

CoefficientList[Series[1/((1-x^4)(1-x^5)), {x, 0, 110}], x] (* or *) LinearRecurrence[{0, 0, 0, 1, 1, 0, 0, 0, -1}, {1, 0, 0, 0, 1, 1, 0, 0, 1}, 110] (* Harvey P. Dale, Aug 16 2012 *)

Table[Floor[(n + 4)/4] - Floor[(n + 4)/5], {n, 0, 100}] (* Wesley Ivan Hurt, Aug 27 2015 *)

PROG

(Magma) [Floor((n+4)/4) - Floor((n+4)/5) : n in [0..100]]; // Wesley Ivan Hurt, Aug 27 2015

CROSSREFS

Cf. A057077, A079998, A117444, A121262.

Sequence in context: A001826 A003641 A355241 * A025890 A334440 A316975

Adjacent sequences: A165187 A165188 A165189 * A165191 A165192 A165193

KEYWORD

nonn,easy

AUTHOR

Alford Arnold, Sep 24 2009

EXTENSIONS

Removed duplicate of comment in A165188; Euler transform formula corrected - R. J. Mathar, Oct 07 2009

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified December 3 05:56 EST 2022. Contains 358512 sequences. (Running on oeis4.)