example_biotracer_data <- read.csv(system.file("extdata", "example_biotracer_data.csv",
package = "EcoDiet"))
plot_data(biotracer_data = example_biotracer_data)
example_stomach_data <- read.csv(system.file("extdata", "example_stomach_data.csv",
package = "EcoDiet"))
plot_data(biotracer_data = example_biotracer_data,
stomach_data = example_stomach_data)
Run the code above in your browser using DataLab