nelder_decision: Create a Nelder Fan experimental design decision table

Description Usage Arguments Details Value Author(s) See Also Examples

View source: R/nelder.R

Description

Creates a Nelder Fan experimental design decision table.

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
nelder_decision(
  DN,
  D1,
  N,
  tau = 1,
  even = FALSE,
  max.angle = 360,
  arc.borders = 1,
  spoke.borders = 1
)

Arguments

DN

Plant density within the last experimental arc (plants ha-1) (i.e. lower extreme of experimental plant density range).

D1

Plant density within the first experimental arc (plants ha-1) (i.e. upper extreme of experimental plant density range).

N

Number of experimental arcs (i.e. number of densities to be tested within D1 to DN).

tau

The "rectangularity" proportion. See nelder for details.

even

Logical indicated whether or not the design should be adjusted so that the angle between spokes goes evenly into max.angle (i.e. so that there are no spokes that must be removed from the experiment as border spokes).

max.angle

The maximum rotation (in degrees) of the design. If 360, then a full circle design will be created.

arc.borders

Number of border arcs on either extreme.

spoke.borders

Number of border spokes on either extreme (only used if max.angle < 360).

Details

This function helps explore Nelder Fan design options and select a design that meets external constraints (e.g. plant or space availability). Function inputs are identical to nelder, but inputs of any length are allowed. All possible combinations of inputs are created using expand.grid, and then each of these cases is passed to nelder for evaluation. Inputs and outputs are all combined and returned for evaluation.

Value

A tibble containing a wide range of traits of the experimental designs.

Author(s)

Kevin J Wolz, kevin@savannainstitute.org

See Also

Other definition functions: goelz_add_border(), goelz_corners(), goelz_guides(), goelz_mirror(), goelz_optim(), goelz_starts(), goelz(), nelder_biculture_competition(), nelder_biculture_optim(), nelder_biculture(), nelder_interspoke_distance(), nelder(), select_optimal_goelz(), select_optimal_nelder_biculture()

Examples

1
2
3
4
5
6
dat <- nelder_decision(DN         = seq(1000, 2000, 50),
                       D1         = 3000,
                       N          = 5,
                       tau        = 1,
                       even       = TRUE,
                       max.angle  = c(90, 180, 360))

kevinwolz/sysdesign documentation built on June 13, 2020, 1:35 a.m.