edu:moneda:start
Diferencias
Muestra las diferencias entre dos versiones de la página.
Ambos lados, revisión anteriorRevisión previaPróxima revisión | Revisión previaÚltima revisiónAmbos lados, revisión siguiente | ||
edu:moneda:start [2020/04/10 14:58] – son0p | edu:moneda:start [2022/03/01 17:11] – son0p | ||
---|---|---|---|
Línea 1: | Línea 1: | ||
- | ====== | + | |
- | | + | |
- | | + | ====== |
+ | <code r> | ||
+ | if (!require(tidyverse)) {install.packages(" | ||
+ | if (!require(readxl)) {install.packages(" | ||
+ | if (!require(httr)) {install.packages(" | ||
+ | if (!require(lubridate)) {install.packages(" | ||
+ | if (!require(glue)) {install.packages(" | ||
+ | |||
+ | begin <- ymd(" | ||
+ | end <- ymd(" | ||
+ | |||
+ | days_to_retrieve <- c(begin, begin + days(1: | ||
+ | |||
+ | get_dayly_data <- function(day_to_retrieve) { | ||
+ | | ||
+ | ## url <- "https://www.bvc.com.co/mercados/ | ||
+ | | ||
+ | GET(url, write_disk(tf <- tempfile(fileext = " | ||
+ | df <- read_excel(tf, | ||
+ | str(df) | ||
+ | |||
+ | if (any(dim(df) == c(0, 0))) { | ||
+ | return(tibble(`Nemotecnico` = "", | ||
+ | } | ||
+ | |||
+ | df %>% | ||
+ | select(" | ||
+ | } | ||
+ | |||
+ | selected_species <- c(" | ||
+ | |||
+ | datos <- days_to_retrieve %>% | ||
+ | map(get_dayly_data) %>% | ||
+ | set_names(days_to_retrieve) %>% | ||
+ | enframe() %>% | ||
+ | unnest(cols = c(value)) | ||
+ | |||
+ | datos %>% | ||
+ | filter(Nemotecnico %in% selected_species) | ||
+ | |||
+ | </ | ||
====== Acciones del Banco de la República en COVID19 ====== | ====== Acciones del Banco de la República en COVID19 ====== | ||
Línea 24: | Línea 64: | ||
* ¿Compran REPOS cuando no hay compra en firme? ¿cuál es la diferencia? | * ¿Compran REPOS cuando no hay compra en firme? ¿cuál es la diferencia? | ||
* ¿Son 500mil millones diarios? | * ¿Son 500mil millones diarios? | ||
+ | |||
+ | ====== Donaciones ====== | ||
+ | * https:// | ||
+ | * https:// | ||
edu/moneda/start.txt · Última modificación: 2022/03/01 17:12 por son0p