This function approximates the highest possible value for l in a nested
loop.
Usage
test.l.max(X, n = 10, ...)
Arguments
X
Numeric matrix with m samples (rows) and n variables (columns).
n
Numeric scalar, number of loop runs and values per loop.
...
Further arguments passed to the function.
Value
A numeric scalar, maximal possible l value.
Author(s)
Michael Dietze, Elisabeth Dietze
References
Dietze E, Hartmann K, Diekmann B, IJmker J, Lehmkuhl F, Opitz S,
Stauch G, Wuennemann B, Borchers A. 2012. An end-member algorithm for
deciphering modern detrital processes from lake sediments of Lake Donggi
Cona, NE Tibetan Plateau, China. Sedimentary Geology 243-244: 169-180.
Klovan JE, Imbrie J. 1971. An Algorithm and FORTRAN-IV Program for
Large-Scale Q-Mode Factor Analysis and Calculation of Factor Scores.
Mathematical Geology 3: 61-77.
See Also
EMMA, check.data,
test.parameters
Examples
## load example data set
data(X, envir = environment())
## create weight transformation limits vector
l <- seq(from = 0, to = 0.6, by = 0.02)
## test l.max
l.max <- test.l.max(X = X)
Results
R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(EMMAgeo)
Loading required package: GPArotation
Loading required package: limSolve
Loading required package: shape
Loading required package: shiny
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/EMMAgeo/test.l.max.Rd_%03d_medium.png", width=480, height=480)
> ### Name: test.l.max
> ### Title: Function to find maximum possible l value.
> ### Aliases: test.l.max
> ### Keywords: EMMA
>
> ### ** Examples
>
> ## load example data set
> data(X, envir = environment())
>
> ## create weight transformation limits vector
> l <- seq(from = 0, to = 0.6, by = 0.02)
>
> ## test l.max
> l.max <- test.l.max(X = X)
>
>
>
>
>
> dev.off()
null device
1
>