### 6.49.15 Rajouter une colonne à une matrice : `border`

`border` a comme argument une matrice `A` de dimension p*q et une liste `b` de dimension p (c’est à dire `nrows(A)=size(b)`).
`border` renvoie la matrice obtenue à partir de `A` en lui rajoutant comme dernière colonne `tran(b)`.
On a :
`border(A,b)=tran([op(tran(A)),b])=tran(append(tran(A),b))`
On tape :

`border([[1,2,4],[3,4,5]],[6,7])`

On obtient :

`[[1,2,4,6],[3,4,5,7]]`

On tape :

`border([[1,2,3,4],[4,5,6,8],[7,8,9,10]],[1,3,5])`

On obtient :

`[[1,2,3,4,1],[4,5,6,8,3],[7,8,9,10,5]]`