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 | ||
edu:moneda:start [2022/02/28 09:49] – son0p | edu:moneda:start [2022/03/01 17:12] (actual) – son0p | ||
---|---|---|---|
Línea 1: | Línea 1: | ||
- | ====== Donaciones ====== | + | |
- | * https:// | + | |
- | * https:// | + | |
====== Consultar precio acciones COLCAP ====== | ====== Consultar precio acciones COLCAP ====== | ||
<code r> | <code r> | ||
- | if(!require(tidyverse)){install.packages(" | + | if (!require(tidyverse)) {install.packages(" |
- | if(!require(readxl)){install.packages(" | + | if (!require(readxl)) {install.packages(" |
- | if(!require(httr)){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 <- glue(" | ||
+ | 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) | ||
- | ## COLCAP stock prices | ||
- | url <- ' | ||
- | GET(url, write_disk(tf <- tempfile(fileext = " | ||
- | df <- read_excel(tf, | ||
- | str(df) | ||
- | especies <- c(" | ||
- | especies_price <- unlist(lapply(especies, | ||
- | as.numeric(dplyr:: | ||
- | }) | ||
- | ) | ||
</ | </ | ||
Línea 42: | Línea 62: | ||
* ¿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.1646041752.txt.gz · Última modificación: 2022/02/28 09:49 por son0p