Function to export the graph options and model parameters

yupana_export(
  data,
  type = NA,
  xlab = NA,
  ylab = NA,
  glab = NA,
  ylimits = NA,
  xrotation = c(0, 0.5, 0.5),
  xtext = NA,
  gtext = NA,
  legend = "top",
  sig = NA,
  error = NA,
  color = TRUE,
  opt = NA,
  dimension = c(20, 10, 100)
)

Arguments

data

Result from yupana_analysis or yupana_import.

type

Plot type

xlab

Title for the axis x

ylab

Title for the axis y

glab

Title for the legend

ylimits

limits of the y axis

xrotation

Rotation in x axis c(angle, h, v)

xtext

Text labels in x axis

gtext

Text labels in group

legend

the position of legends ("none", "left", "right", "bottom", "top", or two-element numeric vector)

sig

Column with the significance

error

Show the error bar ("ste" or "std").

color

colored figure (TRUE), otherwise black & white (FALSE)

opt

Add news layer to the plot

dimension

Dimension of graphs

Value

data frame

Examples

if (FALSE) { library(inti) library(gsheet) url <- paste0("https://docs.google.com/spreadsheets/d/" , "15r7ZwcZZHbEgltlF6gSFvCTFA-CFzVBWwg3mFlRyKPs/edit#gid=172957346") # browseURL(url) fb <- gsheet2tbl(url) smr <- yupana_analysis(data = fb , last_factor = "bloque" , response = "spad_83" , model_factors = "block + geno*treat" , comparison = c("geno", "treat") ) gtab <- yupana_export(smr, type = "line", ylimits = c(0, 100, 2)) #> import url <- paste0("https://docs.google.com/spreadsheets/d/" , "15r7ZwcZZHbEgltlF6gSFvCTFA-CFzVBWwg3mFlRyKPs/edit#gid=1202800640") # browseURL(url) fb <- gsheet2tbl(url) info <- yupana_import(fb) etab <- yupana_export(info) info2 <- yupana_import(etab) etab2 <- yupana_export(info2) }