Let `A` be a `1 x 2 x 2`-array:

```
> A <- array(0, dim=c(1,2,2))
> A
, , 1

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

, , 2

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

```

Then `A[,,1]` is dimensionless:

```
> A[,,1]
[1] 0 0

```

I would like to have:

```
     [,1] [,2]
[1,]    0    0

```

The `drop` argument does not yield what I want:

```
> A[,,1,drop=FALSE]
, , 1

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

```

I find that annoying. And buggy, because R identifies vectors to column matrices, not to row matrices. 

Of course I could do `matrix(A[,,1], 1, 2)`. Is there a more convenient way?