Fixed bug related to vector/matrix confusion
This commit is contained in:
parent
248db439dc
commit
a4d6ba082b
1 changed files with 1 additions and 0 deletions
|
|
@ -6,6 +6,7 @@
|
||||||
#' @param ninds ninds
|
#' @param ninds ninds
|
||||||
#' @export
|
#' @export
|
||||||
computeRows <- function(rowsFromInd, inds, ninds) {
|
computeRows <- function(rowsFromInd, inds, ninds) {
|
||||||
|
if (class(inds) != "matrix") inds <- as.matrix(inds)
|
||||||
if (identical(dim(inds), c(nrow(inds), 1L))) {
|
if (identical(dim(inds), c(nrow(inds), 1L))) {
|
||||||
# Special treatment for vectors because R has col vectors by default,
|
# Special treatment for vectors because R has col vectors by default,
|
||||||
# whereas Matlab has row vectors by default.
|
# whereas Matlab has row vectors by default.
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue