Code:

```
n <- c(1, 2, 4, 6, 7, 8, 9, 11)
x <- c(10, 20, 30, 40, 50, 60, 80, 90)
y <- c(60, 20, 40, 90, 10, 30, 50, 40)
a <- cbind(n,x,y)
a
n x y
[1,] 1 10 60
[2,] 2 20 20
[3,] 4 30 40
[4,] 6 40 90
[5,] 7 50 10
[6,] 8 60 30
[7,] 9 80 50
[8,] 11 90 40
```

Code:

```
n x y
[1,] 1 10 60
[2,] 2 20 20
[3,] 6 40 90
[4,] 7 50 10
[5,] 8 60 30
[8,] 9 80 50
```