Triangle

Gottfried Helms Annette.Warlich at t-online.de
Wed Apr 16 10:31:13 CEST 2008


Hi Richard -

 thanks for that idea. I considered the maple-implementation
 and found a good fixed matrix-representation for this.
 In a matrix-multiplication scheme we have

 St2 = // Stirling numbers 2'nd kind
 | 1   .   .   .   .  . |
 | 1   1   .   .   .  . |
 | 1   3   1   .   .  . |
 | 1   7   6   1   .  . |
 | 1  15  25  10   1  . |
 | 1  31  90  65  15  1 |

 X1 =  // Stirling numbers 2'nd kind, row shifted
 | 1   .    .    .    .    . |
 | .   1    1    .    .    . |
 | .   .    1    3    1    . |
 | .   .    .    1    7    6 |
 | .   .    .    .    1   15 |
 | .   .    .    .    .    1 |

Then simply

     H3 = St2 * X1

In a matrix-multiplication-scheme
                             X1=
                            | 1   .    .    .    .    . |
                            | .   1    1    .    .    . |
                            | .   .    1    3    1    . |
                            | .   .    .    1    7    6 |
                            | .   .    .    .    1   15 |
                            | .   .    .    .    .    1 |
  St2=                       H3 =
 | 1   .   .   .   .  . |   | 1   .    .    .    .    . |
 | 1   1   .   .   .  . |   | 1   1    1    .    .    . |
 | 1   3   1   .   .  . |   | 1   3    4    3    1    . |
 | 1   7   6   1   .  . |   | 1   7   13   19   13    6 |
 | 1  15  25  10   1  . |   | 1  15   40   85   96   75 |
 | 1  31  90  65  15  1 |   | 1  31  121  335  560  616 |

It is nice, that X1 is a simple rowshift of St2.
Now it would be good, if also H4 could be computed by a
similar simple scheme:

H4 =
| 1   .   .    .    .    .    .    .    .   .   .   .  . |
| 1   1   1    1    .    .    .    .    .   .   .   .  . |
| 1   3   4    6    4    3    1    .    .   .   .   .  . |
| 1   7  13   26   31   31   25   13    6   1   .   .  . |
| 1  15  40  100  171  220  255  215  156  85  35  10  1 |

I fiddled a bit but didn't see it yet ...

Gottfried


Am 15.04.2008 21:43 schrieb Richard Mathar:
> After noticing the sum formula in A000258 and further
> decomposition of the Bell numbers in there in terms of S2
> (Stirling numbers of the second kind) one can summarize
> the "Helms" array  H(n,j),  rows n=1,2,3,4,...,
> terms j=2,3,4,..,2n enumerated from the left to the right as:
> 
> H(n,j)= sum_{k+l=j) X(k,l,n)
> 
> where the sum is over the diagonal of an auxiliary upper right
> triangle defined as
> X(k,l,n) := S2(n,k)*S2(k,l) for 1<=k<=n and 1<=l<=k.
> 
> where H(.,.) becomes
> 
> 1 
> 1 1 1 
> 1 3 4 3 1 
> 1 7 13 19 13 6 1 
> 1 15 40 85 96 75 35 10 1 
> 1 31 121 335 560 616 471 240 80 15 1 
> 1 63 364 1253 2891 4221 4502 3353 1806 665 161 21 1 
> 1 127 1093 4599 13923 26222 36225 36205 26895 14756 5887 1638 294 28 1 
> 1 255 3280 16845 64366 153531 264033 336792 322576 236421 131587 55272 16989 3654 498 36 1 
> 1 511 9841 62095 290590 865332 1810747 2850870 3391455 3136381 2258413 1269960 552280 182595 44367 7500 795 45 1 
> ...
> 
> Maple Implementation:
> 
> X := proc(k,l,n)
>         if k >=1 and k <=n and l >=1 and l <= n then
>                 combinat[stirling2](n,k)*combinat[stirling2](k,l)  ;
>         else
>                 0 ;
>         fi ;
> end:
> 
> H := proc(n,j)
>         add( X(j-l,l,n),l=1..floor(j/2)) ;
> end:
> 
> for n from 1 to 10 do
>         for j from 2 to 2*n do
>                 printf("%d ",H(n,j)) ;
>         od:
>         printf("\n") ;
> od:
> 
> 
> 






More information about the SeqFan mailing list