import Control.Applicative ((<$>), (<*>))
import Control.Monad
import Data.List

main :: IO ()
main = do
  solve <$> (getl $ wrds toInt) <*> getLine >>= mapM_ putStrLn

solve :: [Int] -> String -> [String]
solve [n, a, b] s = f a b s
  where
    f x y [] = []
    f x y (z:zs)
      | z == 'a' = if x > 0 then "Yes" : f (x-1) y zs
                   else if y > 0 then "Yes" : f x (y-1) zs
                        else "No" : f x y zs
      | z == 'b' = if y > 0 then "Yes" : f x (y-1) zs
                   else "No" : f x y zs
      | otherwise = "No" : f x y zs
                    
toInt :: String -> Int
toInt = read

wrds :: (String -> a) -> String -> [a]
wrds f = map f . words

getl :: (String -> a) -> IO a
getl f = f <$> getLine
