max/ourMELONS
1
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Changed base Matlab function behavior

Browse source
This commit is contained in:
Waldir Leoncio 2020-07-28 15:35:29 +02:00
parent 2f809d01df
commit c9ff8e76a9
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
R/cell.R
View file

@ -6,10 +6,10 @@
#' @return An array of zeroes with the dimensions passed on call
cell <- function(n, sz = c(n, n), ...) {
if (length(sz) == 1 & missing(...)) {
return(array(dim = c(n, sz)))
return(array(0, dim = c(n, sz)))
} else if (length(sz) == 2) {
return(array(dim = sz))
return(array(0, dim = sz))
} else {
return(array(dim = c(n, sz, ...)))
return(array(0, dim = c(n, sz, ...)))
}
}