import Data.List (sort, group)
import Data.Bool (bool)

main :: IO ()
main = getLine >> solve <$> getLine >>= putStrLn

solve :: String -> String
solve = bool "No" "Yes" . any (> 1) . map length . group . sort