Displaying 2 results from an estimated 2 matches for "evaluatei".
Did you mean:
evaluate
2011 Nov 24
1
AlgDesign - $D $A $Ge $Dea
...designs but the figure of $D, $A, $Ge and $Dea are similar. I don't see $D is close to 0.98, but $Ge is 0.89. One of the output as below:
> dat = gen.factorial(3, 3, center = T, varNames = c("A", "B", "C"))
> desC = optFederov(~quad(A,B,C), dat, nT = 14, evaluateI = T, nR = 100)
> desC
$D
[1] 0.4630447
$A
[1] 3.22
$I
[1] 9.945833
$Ge
[1] 0.893
$Dea
[1] 0.887
$design
A B C
1 -1 -1 -1
3 1 -1 -1
5 0 0 -1
7 -1 1 -1
9 1 1 -1
11 0 -1 0
13 -1 0 0
15 1 0 0
17 0 1 0
19 -1 -1 1
21 1 -1 1
23 0 0 1
25 -1 1 1
27 1 1 1
$rows...
2011 Mar 10
0
OptFederov and Dopt.design
...ead.table("C:/Upstream/Designs/Vodacom Tanzania phase1
grammar/JMP_allowed.txt",sep="\t",header=TRUE,strip.white=TRUE)
formula<-as.formula("~structure+intro + intro/intro1 + concept +
concept/concept1 + prize")
design<-optFederov(formula, data=file, nTrials=48, evaluateI=T,
criterion="D", maxIteration=10000, nRepeats=300,
approximate=F,args=T)
#------------------------------------------------------------------------------------------------------------------------------------------------------------------------
I also use the Rcmdr interface at time...