array() misfeature

Version: 2.5.1

array() is inconsistent when given non-integral dimensions:

zz <- array(0,dim=c(4,3.01))
dim(zz)

[1] 4 3

zz <- array(0,dim=c(201,4.05))

Error in dim(data) <- dim : dim<- : dims [product 804] do not match the length of object [814]


[IMHO the code that did this is broken.  My copy of it has been
fixed.  Consistent behavior and/or a clearer error message would
just have made it easier to find the problem.]