graphoptbd.mae {optbdmaeAT} | R Documentation |
Creates the graphical layout of resultant optimal design
Description
Creates the graphical layout of resultant A-, MV-, D- or E-optimal or near-optimal block design on a separate pop-up GUI tcltk window.
Usage
graphoptbd.mae(trt.N, blk.N, theta, OptdesF, Optcrit, cbVal2)
Arguments
trt.N |
integer, specifying number of treatments, |
blk.N |
integer, specifying number of arrays, |
theta |
numeric, representing a function of the ratio of random array variance and random error variance. It takes any value between 0 and 1, inclusive. |
OptdesF |
matrix, a |
Optcrit |
character specifying the optimality criteria to be used. Thus, |
cbVal2 |
checkbox value. It takes a value of zero or one. The default value of |
Details
Detail discussions concerning the constructions of a graphs can be found in igraph
R package.
Value
Returns the graphical layout of the resultant optimal or near-optimal block design 'OptdesF
' on a separate pop-up window. Furthermore, the function graphoptbd.mae
saves the graphical layout of the resultant optimal or near-optimal block design in .pdf format in a working subdirectory.
Note
When closing a pop-up window for graphical layout of the resultant designs (Graph plot), if the window is closed by
clicking on the red button with "X" sign (top-right), the warning message "Warning message: In rm(list = cmd,
envir = .tkplot.env):
object 'tkp ...' not found"
will occur in R console irrespective of what command is executed next. To resolve this warning message, click
on "close
" menu that is located at the top-left of the graph plot pop-up window when closing this window.
Author(s)
Dibaba Bayisa Gemechu, Legesse Kassa Debusho, and Linda Haines
See Also
Examples
##To create the graphical layout of the D-optimal block design
##obtained using the treatment exchange algorithm for
trt.N <- 10 #Number of treatments
blk.N <- 10 #Number of blocks
theta <- 0.2 #theta value
OptdesF <- rbind(1:10, c(2:10,1)) #D-optimal design (loop design)
graphoptbd.mae(trt.N = 10, blk.N = 10, theta = 0.2, OptdesF, Optcrit = "D", cbVal2 = 0)