The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A105484 Number of partitions of {1...n} containing 2 strings of 3 consecutive integers, where each string is counted within a block and a string of more than 3 consecutive integers are counted three at a time. 6
 1, 2, 9, 38, 177, 882, 4711, 26795, 161583, 1028992, 6896067, 48487476, 356703531, 2738868784, 21901044795, 182022288438, 1569519971934, 14017732109520, 129480496353104, 1235228480628932, 12154988981496309, 123229919746398894 (list; graph; refs; listen; history; text; internal format)
 OFFSET 4,2 REFERENCES A. O. Munagi, Set Partitions with Successions and Separations, Int. J. Math and Math. Sc. 2005, no. 3 (2005), 451-463. LINKS A. O. Munagi, Set Partitions with Successions and Separations,IJMMS 2005:3 (2005),451-463. FORMULA a(n)=Sum(c(n, k, 2), k=1...n), where c(n, k, 2) is the case r =2 of c(n, k, r) given by c(n, k, r)=c(n-1, k-1, r)+(k-1)c(n-1, k, r)+c(n-2, k-1, r)+(k-1)c(n-2, k, r)+c(n-1, k, r-1)-c(n-2, k-1, r-1)-(k-1)c(n-2, k, r-1), r=0, 1, .., n-k-1, k=1, 2, .., n-2r, c(n, k, 0)=sum(binomial(n-j, j)*S2(n-j-1, k-1), j= 0..floor(n/2)). EXAMPLE a(6)=9 because the partitions of {1,...,6} with 2 strings of 3 consecutive integers are 12346/5, 13456/2, 16/2345, 1234/56, 123/456, 12/3456, 1234/5/6, 1/2345/6, 1/2/3456. MAPLE c := proc(n, k, r) option remember ; local j ; if r =0 then add(binomial(n-j, j)*combinat[stirling2](n-j-1, k-1), j=0..floor(n/2)) ; else if r <0 or r > n-k-1 then RETURN(0) fi ; if n <1 then RETURN(0) fi ; if k <1 then RETURN(0) fi ; RETURN( c(n-1, k-1, r)+(k-1)*c(n-1, k, r)+c(n-2, k-1, r)+(k-1)*c(n-2, k, r) +c(n-1, k, r-1)-c(n-2, k-1, r-1)-(k-1)*c(n-2, k, r-1) ) ; fi ; end: A105484 := proc(n) local k ; add(c(n, k, 2), k=1..n) ; end: for n from 4 to 27 do printf("%d, ", A105484(n)) ; od ; # R. J. Mathar, Feb 20 2007 CROSSREFS Cf. A105483, A105485, A105488, A105492. Sequence in context: A151003 A151004 A151005 * A151006 A151007 A151008 Adjacent sequences:  A105481 A105482 A105483 * A105485 A105486 A105487 KEYWORD nonn AUTHOR Augustine O. Munagi, Apr 10 2005 EXTENSIONS More terms from R. J. Mathar, Feb 20 2007 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 29 16:58 EST 2020. Contains 331347 sequences. (Running on oeis4.)