if (!require(tidyverse)) {install.packages("tidyverse")}
if (!require(readxl)) {install.packages("readxl")}
if (!require(httr)) {install.packages("httr")}
if (!require(lubridate)) {install.packages("lubridate")}
if (!require(glue)) {install.packages("glue")}
 
begin <- ymd("2022-02-01")
end <- ymd("2022-02-07")
 
days_to_retrieve <- c(begin, begin + days(1:as.integer(interval(begin, end) / days(1))))
 
get_dayly_data <- function(day_to_retrieve) {
   url <- glue("https://www.bvc.com.co/mercados/DescargaXlsServlet?archivo=acciones&fecha={as.character(day_to_retrieve)}&resultados=100&tipoMercado=1")
  GET(url, write_disk(tf <- tempfile(fileext = ".xls")))
  df <- read_excel(tf, 1L)
  str(df)
 
  if (any(dim(df) == c(0, 0))) {
    return(tibble(`Nemotecnico` = "", `Ultimo Precio` = double()))
  }
 
  df %>%
    select("Nemotecnico", "Ultimo Precio")
}
 
selected_species <- c("CELSIA", "NUTRESA", "BCOLOMBIA") ## example of selected species
 
datos <- days_to_retrieve %>%
  map(get_dayly_data) %>%
  set_names(days_to_retrieve) %>%
  enframe() %>%
  unnest(cols = c(value))
 
datos %>%
  filter(Nemotecnico %in% selected_species)

https://www.banrep.gov.co/es/jdbr-adopto-medidas-adicionales-materia-liquidez-y-manera-unanime-recorto-medio-punto-porcentual-su

• Non Delivery Forwards (NDF)
• Liquidez transitoria en dólares para aliviar restricciones de financiamiento externo y las presiones en el mercado cambiario
  • 30 marzo de 2020 Subasta FX Swaps ($US400millones) el BR vende a contado y los compra a 60 días, lo que no se adjudique en un día se vende al siguiente hasta que monto el remanente sea menor a $US25millones.

https://www.banrep.gov.co/es/banco-republica-inyecta-liquidez-permanente-economia-realizando-compras-titulos-deuda-publica-y

• ¿el BR le va a comprar títulos privados? ¿esto es acciones?
• ¿de donde saca el BR 10 billones?
• ¿de dónde salen 2billones para comprar TES?
• ¿qué son TES?
• ¿Qué es el SEN (sistema electrónico de negociación?
• ¿Qué sucede en una subasta de REPOS?
• ¿Compran REPOS cuando no hay compra en firme? ¿cuál es la diferencia?
  • ¿Son 500mil millones diarios?

• https://zenroom.org/ Permite una base de datos con privacidad
• https://decodeproject.eu/blog/smart-contracts-english-speaker Permite programar el flujo del dinero