Nothing
## ----setup, include = FALSE---------------------------------------------------
library(ExPanDaR)
library(gapminder)
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----expand_file, eval = FALSE------------------------------------------------
# devtools::install_github("joachim-gassen/ExPanDaR")
# library(ExPanDaR)
#
# ExPanD()
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_file_01.jpg")
## ----gapminder----------------------------------------------------------------
library(gapminder)
# write.csv(gapminder, file = "gapminder.csv", row.names = FALSE)
head(gapminder, 10)
## ----gapminder duplicates-----------------------------------------------------
any(duplicated(gapminder[,c("country", "year")]))
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_file_02.jpg")
## ----expand_simple, eval = FALSE----------------------------------------------
# devtools::install_github("joachim-gassen/ExPanDaR")
# library(ExPanDaR)
# library(gapminder)
#
# ExPanD(df = gapminder, cs_id = "country", ts_id = "year")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_simple_01.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_simple_02.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_simple_03.jpg")
## ----simple_expland_config, eval = FALSE--------------------------------------
# ExPanD_config <- readRDS("ExPanD_config.RDS")
# ExPanD(df = gapminder, cs_id = "country", ts_id = "year", config_list = ExPanD_config)
## ----var_def------------------------------------------------------------------
head(worldbank_var_def, 10)
## ----worldbank, eval = FALSE--------------------------------------------------
# library(ExPanDaR)
#
# ExPanD(df = worldbank,
# df_def = worldbank_data_def,
# var_def = worldbank_var_def,
# config_list = ExPanD_config_worldbank)
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_01.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_02.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_03.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_04.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_05.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_06.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_07.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_08.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_worldbank_09.jpg")
## ----expand_two_samples, eval = FALSE-----------------------------------------
# library(ExPanDaR)
# set.seed(42)
# training_sample <- sample(nrow(russell_3000), round(.5*nrow(russell_3000)))
# test_sample <- setdiff(1:nrow(russell_3000), training_sample)
#
# ExPanD(df = list(russell_3000[training_sample, ], russell_3000[test_sample, ]),
# df_def = russell_3000_data_def,
# df_name = c("Training sample", "Test sample"))
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_two_samples_01.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_two_samples_02.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_two_samples_03.jpg")
## ---- out.width = "90%", fig.align="center", fig.border = "none", echo=FALSE----
knitr::include_graphics("figures/ExPanD_two_samples_04.jpg")
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.