From e4c0752719a91d0ff3f040a3a68330ae59a156ab Mon Sep 17 00:00:00 2001 From: Johan-rosa Date: Thu, 5 Mar 2026 10:03:00 -0400 Subject: [PATCH] feat: tasas in percent --- R/operaciones_interbancarias.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/R/operaciones_interbancarias.R b/R/operaciones_interbancarias.R index f8af406..5a73c05 100644 --- a/R/operaciones_interbancarias.R +++ b/R/operaciones_interbancarias.R @@ -93,8 +93,10 @@ get_tasa_interbancaria <- function() { dplyr::distinct(year, year_mes, .keep_all = TRUE) |> dplyr::mutate( mes = databcrd::crear_mes(year_mes), - date = lubridate::make_date(year, mes, 1) + date = lubridate::make_date(year, mes, 1), + dplyr::across(dplyr::starts_with("tasa"), \(x) x * 100) ) |> + dplyr::select(-year_mes) |> dplyr::relocate(date, year, mes) |> suppressMessages() |> suppressWarnings()