Commit baf86817 authored by Pauline Maury Laribière's avatar Pauline Maury Laribière
Browse files

removing hash

parent f98e0907
Pipeline #323975 passed with stage
in 11 seconds
......@@ -28,21 +28,21 @@ csv_request <- function(url) {
}
# Request function based on expected response
REQUEST_FUNCTION_MAPPING <- hash::hash(
REQUEST_FUNCTION_MAPPING <- list(
"SDMX-ML" = sdmx_request,
"JSON" = json_request,
"CSV" = csv_request
)
#' Transform a hash object into a string of parameters
#' hash::hash("a" = list("1"), "b" = list("2", "3"))
#' Transform a list into a string of parameters
#' list("a" = list("1"), "b" = list("2", "3"))
#' becomes "a=1&b=2&b=3"
#'
#' @param filters hash object
#'
#' @return formatted string of parameters
hash_to_string <- function(filters) {
list_to_string <- function(filters) {
string <- ""
for (prop in ls(filters)) {
for (value in filters[[prop]]) {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment