AugustoCL

# imports -----------------------------------------------------------------
library(tidyverse)
library(httr)
library(bizdays)

# set inputs and workdir --------------------------------------------------------------
wkdir <- "~/dev_R/schedule_R/"
name_db <- "hist_coef_pre_ipca.csv"

setwd(wkdir)

AugustoCL

# Imports -----------------------------------------------------------------
library(tidyverse)
library(httr)
library(rvest)
library(janitor)

# Função webscraping ------------------------------------------------------

scrapy_consumo_eletr_ano <- function(ano){

AugustoCL

#' Render Table of Contents
#' 
#' A simple function to extract headers from an RMarkdown or Markdown document
#' and build a table of contents. Returns a markdown list with links to the 
#' headers using 
#' [pandoc header identifiers](http://pandoc.org/MANUAL.html#header-identifiers).
#' 
#' WARNING: This function only works with hash-tag headers.
#' 
#' Because this function returns only the markdown list, the header for the