Nothing
## ----setup, include=FALSE-----------------------------------------------------
knitr::opts_chunk$set(echo = TRUE, collapse = TRUE, comment = "#>")
## ---- eval=FALSE--------------------------------------------------------------
# install.packages("sidrar")
## ---- eval=FALSE--------------------------------------------------------------
# library(devtools)
# install_github("rpradosiqueira/sidrar")
## ---- eval=FALSE--------------------------------------------------------------
# get_sidra It recovers data from the given table
# according to the parameters
#
# info_sidra It allows you to check what parameters
# are available for a table via an web browser
#
# search_sidra It searches which tables have a particular
# word in their names
## ---- eval = FALSE------------------------------------------------------------
# library(sidrar)
#
# get_sidra(x = 1419,
# variable = 63,
# period = c("last" = 12),
# geo = "City",
# geo.filter = 5002407,
# classific = "c315",
# category = list(7169),
# header = FALSE,
# format = 3)
#
## ---- echo = FALSE, eval=FALSE------------------------------------------------
# ## Tabela obtida
# library(sidrar)
#
# get_sidra(x = 1419,
# variable = 63,
# period = c(last = "12"),
# geo = "City",
# geo.filter = 5002704,
# classific = "c315",
# category = list(7169),
# header = FALSE,
# format = 3)
#
## ---- eval = FALSE------------------------------------------------------------
# get_sidra(x = 5939,
# variable = 529,
# period = "2014",
# geo = "State",
# header = TRUE,
# format = 1)
#
## ---- echo = FALSE, eval=FALSE------------------------------------------------
# get_sidra(x = 5939,
# variable = 529,
# period = "2014",
# geo = "State",
# header = TRUE,
# format = 1)
#
## ---- eval = FALSE------------------------------------------------------------
# get_sidra(api = "/t/5938/n3/all/v/37/p/last%201/d/v37%200")
#
## ---- echo = FALSE, eval=FALSE------------------------------------------------
# get_sidra(api = "/t/5938/n3/all/v/37/p/last%201/d/v37%200")
#
## ---- echo = FALSE, eval=FALSE------------------------------------------------
# info_sidra(5939)
## ---- eval=FALSE--------------------------------------------------------------
# info_sidra(5939, wb = TRUE)
## ---- echo=FALSE, error=TRUE--------------------------------------------------
cat("Can the web browser be open? (y/n): ")
## ---- eval=FALSE--------------------------------------------------------------
# search_sidra(c("gini"))
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.