import           Control.Monad                  ( forM_
                                                , replicateM
                                                )

main :: IO ()
main = do
    [n, k] <- map read.words <$> getLine :: IO [Integer]
    let factorial 0 _ = 1
        factorial _ 0 = 1
        factorial i j = i * factorial (i - 1) (j - 1)
    let comb n m = factorial n l `div` factorial l l
          where l = min m (n-m)
    forM_ ([1 .. k] :: [Integer]) $ \i -> do
        let b = comb (k-1) (i-1)
            r = comb (n-k+1) i
        print $ b * r `mod` 1000000007
