Learn R Programming

madness (version 0.1.0)

marithops: Basic Matrix Arithmetic Operations.

Description

These perform basic matrix arithmetic on madness objects: matrix multiplication, cross product, Kronecker product.

Usage

## S3 method for class 'madness,madness':
\%*\%(x, y)

## S3 method for class 'madness,array': \%*\%(x, y)

## S3 method for class 'array,madness': \%*\%(x, y)

crossprod(x, y = NULL, ...)

## S3 method for class 'madness,madness': crossprod(x, y)

## S3 method for class 'madness,ANY': crossprod(x, y)

## S3 method for class 'madness,missing': crossprod(x, y)

## S3 method for class 'ANY,madness': crossprod(x, y)

tcrossprod(x, y = NULL, ...)

## S3 method for class 'madness,madness': tcrossprod(x, y)

## S3 method for class 'madness,ANY': tcrossprod(x, y)

## S3 method for class 'madness,missing': tcrossprod(x, y)

## S3 method for class 'ANY,madness': tcrossprod(x, y)

Arguments

x, y
madness or numeric matrix values.
...
ignored here.

Examples

Run this code
set.seed(123)
y <- array(rnorm(3*3),dim=c(3,3))
dy <- matrix(rnorm(length(y)*2),ncol=2)
dx <- crossprod(matrix(rnorm(ncol(dy)*100),nrow=100))
obj0 <- madness(val=y,vtag='y',xtag='x',dvdx=dy,varx=dx)
z <- array(rnorm(3*3),dim=c(3,3))

anobj <- obj0 %*% obj0
anobj <- z %*% obj0
anobj <- crossprod(obj0)
anobj <- crossprod(obj0,z)
anobj <- tcrossprod(obj0,obj0)
# NYI: 
# anobj <- obj0 \%x\% obj0

Run the code above in your browser using DataLab