Rで、長さの違う複数のベクトルからNAを補ってデータフレームの作成

> x <- c(1:5)
> y <- c(1:3)
> y[4:5] <- NA
> y
[1]  1  2  3 NA NA
> z <- cbind(x, y)
> z
     x  y
[1,] 1  1
[2,] 2  2
[3,] 3  3
[4,] 4 NA
[5,] 5 NA
> boxplot(x,y)