Diferencias

Muestra las diferencias entre dos versiones de la página.

--- edu:moneda:start [2022/02/28 20:32] – [Consultar precio acciones COLCAP] brolin
+++ edu:moneda:start [2022/03/01 17:12] (actual) – son0p
@@ Línea 1: / Línea 1: @@
-====== Donaciones ======
-  * https://zenroom.org/ Permite una base de datos con privacidad
-  * https://decodeproject.eu/blog/smart-contracts-english-speaker  Permite programar el flujo del dinero
 ====== Consultar precio acciones COLCAP ======
@@ Línea 17: / Línea 15: @@
 get_dayly_data <- function(day_to_retrieve) {
-  ## COLCAP stock prices
+   url <- glue("https://www.bvc.com.co/mercados/DescargaXlsServlet?archivo=acciones&fecha={as.character(day_to_retrieve)}&resultados=100&tipoMercado=1")
-  ## url <- "https://www.bvc.com.co/mercados/DescargaXlsServlet?archivo=acciones&fecha=2022-02-22&resultados=100&tipoMercado=1"
-  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)
-  ## especies <- c("CELSIA", "NUTRESA", "BCOLOMBIA") ## example of selected especies
   if (any(dim(df) == c(0, 0))) {
     return(tibble(`Nemotecnico` = "", `Ultimo Precio` = double()))
@@ Línea 32: / Línea 28: @@
 }
-selected_species <- c("CELSIA", "NUTRESA", "BCOLOMBIA") ## example of selected especies
+selected_species <- c("CELSIA", "NUTRESA", "BCOLOMBIA") ## example of selected species
 datos <- days_to_retrieve %>%
@@ Línea 66: / Línea 62: @@
   * ¿Compran REPOS cuando no hay compra en firme? ¿cuál es la diferencia?
     * ¿Son 500mil millones diarios?
+====== Donaciones ======
+  * https://zenroom.org/ Permite una base de datos con privacidad
+  * https://decodeproject.eu/blog/smart-contracts-english-speaker  Permite programar el flujo del dinero