import Control.Applicative
import Control.Monad
import Data.Functor
import Data.List
import Data.Maybe

base = 10 ^ 9 + 7

mmul x y = (x * y) `mod` base
mpow x 0 = 1
mpow x y
  | odd y  = mmul x $ mmul t t
  | even y = mmul t t
  where
    t = mpow x $ div y 2

minv = flip mpow (base - 2)

c n k
  | k == 0 || k==n   = 1
  | k<0 || k > n     = 0
  | otherwise        = mmul (foldl1 mmul [n-k+1..n]) (foldl1 mmul $ map minv [1..k])

f n k i = c (k-1) (i-1) * c (n-k+1) (i)

main = map read . words <$> getLine >>= \[n, k] -> mapM_ (print . f n k) [1..k]