pref.defaults <-
structure(list(BreedingProgram = structure(list(crop = "Potato"), .Names = "crop"),
GermplasmList = structure(list(prefix = "LG", years = 16L,
seasons = "C", trialphase = "OT", nOfGenotypes = 23L,
seedsPerPlot = 10L, LoG = "LGXY16C.xlsx"), .Names = c("prefix",
"years", "seasons", "trialphase", "nOfGenotypes", "seedsPerPlot",
"LoG")), Designs = structure(list(design = "UDNR"), .Names = "design")), .Names = c("BreedingProgram",
"GermplasmList", "Designs"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.