Nothing
#' Test if the object is a tensor
#' @param x object
#' @export
is_tensor <- function(x) inherits(x, "tensor")
#' Length of a tensor
#'
#' The total number of values in a tensor. Equal to the product of
#' the dimensions.
#'
#' @param x tensor
#' @export
setMethod("length", "tensor", function(x) prod(dim(x)) )
#' Dimensions of a tensor
#'
#' @name dim
#' @param x tensor
NULL
#' Dimension names of a tensor
#'
#' @name dimnames
#' @param x tensor
#' @param value replacement value. Must be a list of length equal to the number of dimensions in the tensor
NULL
#' Vectorize values of a tensor
#'
#' @name as.vector
#' @param x tensor
NULL
#' Show a tensor
#'
#' @name show
#' @param object tensor
#' @keywords internal
NULL
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.