This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A032006 "AFK" (ordered, size, unlabeled) transform of 2,1,1,1,... 2
 1, 2, 1, 5, 5, 7, 19, 21, 33, 41, 101, 109, 175, 231, 321, 623, 761, 1087, 1495, 2109, 2661, 4985, 5849, 8557, 11251, 15831, 20373, 27743, 44357, 55135, 76123, 101373, 136689, 178673, 240125, 303997, 475183, 578271, 793809, 1024991, 1387985, 1763719, 2363671 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 COMMENTS Number of compositions of n into distinct parts if there are 2 kinds of part 1. a(3) = 5: 3, 21, 21', 12, 1'2. LINKS Alois P. Heinz, Table of n, a(n) for n = 0..1000 C. G. Bower, Transforms (2) MAPLE b:= proc(n, i, p) option remember;       `if`(n=0, p!, `if`(i<1, 0, b(n, i-1, p)+       `if`(i>n, 0, `if`(n=1, 2, 1)*b(n-i, i-1, p+1))))     end: a:= n-> b(n\$2, 0): seq(a(n), n=0..45);  # Alois P. Heinz, Sep 05 2015 PROG (PARI) seq(n)={apply(p->subst(serlaplace(p), y, 1), Vec((1 + 2*x*y)*prod(k=2, n, 1 + x^k*y + O(x*x^n))))} \\ Andrew Howroyd, Jun 21 2018 CROSSREFS Cf. A032303. Sequence in context: A193536 A152290 A248699 * A167158 A074392 A284428 Adjacent sequences:  A032003 A032004 A032005 * A032007 A032008 A032009 KEYWORD nonn AUTHOR EXTENSIONS a(0)=1 prepended by Alois P. Heinz, Sep 05 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.

Last modified January 20 21:36 EST 2019. Contains 319336 sequences. (Running on oeis4.)