Fieldbook analysis report

Source: R/yupana_analysis.R

Function to create a complete report of the fieldbook

yupana_analysis(
  data,
  response,
  model_factors,
  comparison,
  test_comp = "SNK",
  sig_level = 0.05,
  plot_dist = "boxplot",
  plot_diag = FALSE,
  digits = 2
)

Arguments

data

Field book data.
response

Response variable.
model_factors

Model used for the experimental design.
comparison

Factors to compare
test_comp

Comprasison test c("SNK", "TUKEY", "DUNCAN")
sig_level

Significal test (default: p = 0.005)
plot_dist

Plot data distribution (default = "boxplot")
plot_diag

Diagnostic plots for model (default = FALSE).
digits

Digits number in the table exported.

Value

list

Examples


if (FALSE) {

library(inti)
library(gsheet)

url <- paste0("https://docs.google.com/spreadsheets/d/"
              , "15r7ZwcZZHbEgltlF6gSFvCTFA-CFzVBWwg3mFlRyKPs/edit#gid=946957922")
# browseURL(url)

fb <- gsheet2tbl(url)

yrs <- yupana_analysis(data = fb
                       , response = "spad_83"
                       , model_factors = "geno + treat"
                       , comparison = c("geno", "treat")
                       )
                       
yrs$meancomp

}