View source: R/tarpuy_design.R
tarpuy_design | R Documentation |
Function to deploy experimental designs
tarpuy_design(
data,
nfactors = 1,
type = "crd",
rep = 2,
zigzag = FALSE,
nrows = NA,
serie = 100,
seed = NULL,
fbname = NA,
qrcode = "{fbname}{plots}{factors}"
)
data |
Experimental design data frame with the factors and level. See examples. |
nfactors |
Number of factor in the experiment(default = 1). See details. |
type |
Type of experimental arrange (default = "crd"). See details. |
rep |
Number of replications in the experiment (default = 3). |
zigzag |
Experiment layout in zigzag [logic: FALSE]. |
nrows |
Experimental design dimension by rows [numeric: value] |
serie |
Number to start the plot id [numeric: 100]. |
seed |
Replicability of draw results (default = 0) always random. See details. |
fbname |
Barcode prefix for data collection. |
qrcode |
[string: "{fbname}{plots}{factors}"] String to concatenate the qr code. |
The function allows to include the arguments in the sheet that have
the information of the design. You should include 2 columns in the sheet:
{arguments}
and {values}
. See examples. The information will
be extracted automatically and deploy the design. nfactors
= 1:
crd, rcbd, lsd, lattice. nfactors
= 2 (factorial): split-crd,
split-rcbd split-lsd nfactors
>= 2 (factorial): crd, rcbd, lsd.
A list with the fieldbook design
## Not run:
library(inti)
library(gsheet)
url <- paste0("https://docs.google.com/spreadsheets/d/"
, "1510fOKj0g4CDEAFkrpFbr-zNMnle_Hou9O_wuf7Vdo4/edit?gid=1479851579#gid=1479851579")
# browseURL(url)
fb <- gsheet2tbl(url)
dsg <- fb %>% tarpuy_design()
dsg %>%
tarpuy_plotdesign()
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.