Proj.test: Test accuracy of projection method.

Usage Arguments Examples

View source: R/gsp.R

Usage

1
Proj.test(x, fun = Proj)

Arguments

x
fun

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (x, fun = Proj) 
{
    help = "\n     # sample test:\n     zz <- matrix( rnorm(120), ncol = 3) %*% diag(c(10000,1,.000001))\n     Proj.test( zz, fun = Proj)\n     Proj.test( zz, fun = Proj.1)\n"
    pp <- fun(x)
    ret <- pp %*% pp - pp
    attr(ret, "maxabs") <- max(abs(ret))
    attr(ret, "maxabs")
  }

gmonette/spida documentation built on May 17, 2019, 7:25 a.m.