Nothing
## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----echo=FALSE, include=FALSE------------------------------------------------
library(metrica)
library(dplyr)
library(purrr)
library(tidyr)
## ----warning=FALSE, message=FALSE, include=TRUE, echo=TRUE, eval=FALSE--------
# # Obtaining filepath from package folder
# apsim_out_filepath <- system.file("extdata/soybean.out", package = "metrica")
#
# # Use import_apsim_out for APSIM Classic output
# soybean.out <- metrica::import_apsim_out(filepath = apsim_out_filepath)
#
# head(soybean.out)
## ----warning=FALSE, message=FALSE, include=TRUE, echo=TRUE, eval=FALSE--------
# # Obtaining path from package folder
# apsim_db_folderpath <- system.file("extdata", package = "metrica")
#
# # Use import_apsim_db for APSIM NextGeneration output
# soybean.db <- metrica::import_apsim_db(filename = "soybean.example.db", folder = apsim_db_folderpath)
#
# head(soybean.db)
#
# # If observed.data is already as a dataframe, the user may do the match using a simple code like this:
# # PO.dataframe <- simulated.data %>% left_join(., observed.data) *by = "col" arg. could be required*
#
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.