import Control.Applicative
import Control.Monad
import Data.List

main :: IO ()
main = do
    [n, m] <- fmap read . words <$> getLine :: IO [Int]
    as <- fmap concat . replicateM m $ do
        fmap read . words <$> getLine :: IO [Int]
    forM_ [1 .. n] $ \i -> do
        print $ length (filter (== i) as)