[R-br] Dúvida urgente sobre array

Galera, queria tirar uma dúvida sobre os arrays, isso está me dando dor de cabeça para realizar uma função para gerar um modelo. Um exemplo seria:

ar_K<-array(1,dim=c(1,2,2)) ar_K , , 1

[,1] [,2] [1,] 1 1 , , 2 [,1] [,2] [1,] 1 1

ar_K[,,1] [1] 1 1

is.matrix(ar_K[,,1]) [1] FALSE

is.vector(ar_K[,,1]) [1] TRUE

Queria selecionar uma matriz desse array, mas sempre vem como vetor. Como posso selecionar só a matriz dentro do array? Abraços!!!