compare.fus {ALTopt}

Comparing designs using FUS

Description

compare.fus draws the FUS plots of multiple designs on a single frame.

Usage

compare.fus(...)

Arguments

...

Objects created by pv.fus.rc or pv.fus.ic.

Value

FUS plots of multiple designs.

See Also

pv.fus.rc, pv.fus.ic

Examples

## Not run: 
# Generating D optimal design and FUS plot.
Dopt <- altopt.rc("D", 100, 100, 2, 1, formula = ~ x1 + x2 + x1:x2,
coef = c(0, -4.086, -1.476, 0.01))

FUS.D <- pv.fus.rc(Dopt$opt.design.rounded, 100, 2, 1,
formula = ~ x1 + x2 + x1:x2, coef = c(0, -4.086, -1.476, 0.01),
useLower = c(1.458, 2.859), useUpper = c(2.058, 3.459))

# Generating U optimal design and FUS plot.
Uopt <- altopt.rc("U", 100, 100, 2, 1, formula = ~ x1 + x2 + x1:x2,
coef = c(0, -4.086, -1.476, 0.01), useCond = c(1.758, 3.159))

FUS.U <- pv.fus.rc(Uopt$opt.design.rounded, 100, 2, 1,
formula = ~ x1 + x2 + x1:x2, coef = c(0, -4.086, -1.476, 0.01),
useLower = c(1.458, 2.859), useUpper = c(2.058, 3.459))

# Comparing D and U optimal designs.
compare.fus(FUS.D, FUS.U)

## End(Not run)