R/as.matrix.R

#' @include editmatrix.R
#' @include editarray.R
#' @include editset.R
{}

#' convert to matrix
#'
#' @export
#' @method as.matrix editmatrix
#' @rdname editmatrix
#'
#' @return \code{as.matrix}: Augmented \code{matrix} of \code{editmatrix}. (See also \code{\link{getAb}}).
as.matrix.editmatrix <- function(x, ...){
   array(x, dim=dim(x), dimnames=dimnames(x))
}


#' convert to matrix
#' @export
#' @method as.matrix editarray
#' @rdname editarray
#' @return \code{as.matrix}: The boolean matrix part of the \code{editarray}.
as.matrix.editarray <- function(x,...){
    array(x,dim=dim(x),dimnames=dimnames(x))
}

Try the editrules package in your browser

Any scripts or data that you put into this service are public.

editrules documentation built on May 1, 2019, 6:32 p.m.