Waldelene, bom dia!

Verifique se atende:

### <code r>
calcular_matrizes <- function(p) cbind(c(p+5, 6), c(10, p+8))

### testes
calcular_matrizes(3)
calcular_matrizes(4)
lapply(1:5, calcular_matrizes)

### atribuindo o resultado à uma variável
A <- calcular_matrizes(3); A
### </code>

Éder Comunello <comunello.eder@gmail.com>
Dourados, MS - [22 16.5'S, 54 49'W]