Grid[ Table[ Table[ Binomial[ n, k ], { k, -6, 13 } ], { n, 0, 10 } ] ]