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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A255486 Number of odd terms in expansion of (1+x+x^3+x^4)^n. 4
1, 4, 4, 10, 4, 12, 10, 18, 4, 16, 12, 28, 10, 28, 18, 38, 4, 16, 16, 40, 12, 40, 28, 52, 10, 40, 28, 64, 18, 52, 38, 74, 4, 16, 16, 40, 16, 48, 40, 72, 12, 48, 40, 96, 28, 88, 52, 108, 10, 40, 40, 100, 28, 96, 64, 120, 18, 72, 52, 120, 38 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..8191

MAPLE

r1:=proc(f) local g, n; g:=n->nops(expand(f^n) mod 2); [seq(g(n), n=0..90)]; end;

r1(1+x+x^2+x^3);

MATHEMATICA

a[n_] := Count[(List @@ Expand[(1+x+x^3+x^4)^n]) /. x -> 1, _?OddQ]; a[0] = 1;

Table[a[n], {n, 0, 60}] (* Jean-Fran├žois Alcover, Apr 04 2017 *)

PROG

(PARI) a(n) = {my(pol=(1+x+x^3+x^4)*Mod(1, 2)); subst(lift(pol^n), x, 1); } \\ Michel Marcus, Mar 01 2015

CROSSREFS

Cf. A001316, A071053, A134660, A134661, A134662, A255485, A247649.

Sequence in context: A120395 A321078 A160723 * A286779 A007426 A319056

Adjacent sequences:  A255483 A255484 A255485 * A255487 A255488 A255489

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, Mar 01 2015

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 October 13 20:38 EDT 2019. Contains 327981 sequences. (Running on oeis4.)