como procurar valores entre vetores de tamalho diferente?

 

Exemplo: x = c("a","L","k","w","t")

y = c("t","a","3")

x[x==y] = "Casa"

 

Mensagens de aviso perdidas:
In x == y :
  comprimento do objeto maior não é múltiplo do comprimento do objeto menor

 

Gostaria de ver dentro de x e y  e o que for igual subistituir pela palabra casa. É um exemplo bem simples mas só para que eu possa entender como resolver problemas dessa natureza.
--
Saudações,