Description Usage Arguments Value Author(s) See Also Examples
Extract the experimental design set of level number i from an object of class
("NestedDesign"
) representing a nested experimental design set.
1 | ExtractNestDesign(NestDes,level)
|
NestDes |
an object of class ( |
level |
an integer indicating the level from which we want to extract the experimental design set. |
a matrix corresponding to the extracted experimental design set.
Loic Le Gratiet
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | #-- Nested Experimental design sets
dimension <- 3
nD1 <- 100
nD2 <- 50
nD3 <- 20
set.seed(1);D1 <- matrix(runif(n=nD1*dimension, 0,1),ncol=dimension)
set.seed(2);D2 <- matrix(runif(n=nD2*dimension, 0,1),ncol=dimension)
set.seed(3);D3 <- matrix(runif(n=nD3*dimension, 0,1),ncol=dimension)
NestDesign <- NestedDesignBuild(design = list(D1,D2,D3))
#-- Design set at level 1
NestDesign$PX
#-- Extraction of design sets at level 2 and 3
ExtractNestDesign(NestDesign,2)
ExtractNestDesign(NestDesign,3)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.