let charl_of_string s =
  let rec exp i l =
    if i < 0 then l else exp (i - 1) (s.[i] :: l) in
  exp (String.length s - 1) []

let dp = Array.make 26 0

let calc c =
  let ind = (int_of_char 'a') - 97 in
  dp.(ind) <- dp.(ind) + 1

let flag = ref true
let cl =
  read_line ()
  |> charl_of_string
  |> List.map calc
  
let () =
  for i = 0 to 25 do
    if dp.(i) mod 2 = 1 then flag := false
  done;
  if !flag then print_endline "Yes"
  else print_endline "No"
