-
Notifications
You must be signed in to change notification settings - Fork 30
/
Copy pathsubBM-class.R
41 lines (30 loc) · 1.02 KB
/
subBM-class.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
################################################################################
#' S3 class subBM
#'
#' A class for representing a subset view of a `big.matrix`.
#'
#' A named list with at 3 slots: \describe{
#' \item{desc}{The `big.matrix.descriptor` object.}
#' \item{rows}{Indices of rows to be used.}
#' \item{cols}{Indices of columns to be used.}
#' }
#'
#' @name subBM-class
#' @aliases subBM-class subBM
NULL
################################################################################
################################################################################
## Dimensions
#' @rdname subBM-class
#' @S3method nrow subBM
nrow.subBM <- function(x) length(x$rows)
#' @rdname subBM-class
#' @S3method ncol subBM
ncol.subBM <- function(x) length(x$cols)
#' @rdname subBM-class
#' @S3method dim subBM
dim.subBM <- function(x) c(nrow(x), ncol(x))
#' @rdname subBM-class
#' @S3method length subBM
length.subBM <- function(x) prod(dim(x))
################################################################################