espelhamento de https://git.sr.ht/~hrbrmstr/splashr
Você não pode selecionar mais de 25 tópicos
Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.
17 linhas
471 B
17 linhas
471 B
#' Convert a Base64 encoded string into an R object
|
|
#'
|
|
#' A simple wrapper around calls to `openssl::base64_decode()` and
|
|
#' `jsonlite::fromJSON()`.
|
|
#'
|
|
#' @md
|
|
#' @param x a string
|
|
#' @param flatten flatten JSON structures upon conversion?
|
|
#' @param ... passed on to `jsonlite::fromJSON()`
|
|
#' @export
|
|
json_fromb64 <- function(x, flatten=TRUE, ...) {
|
|
|
|
tmp <- openssl::base64_decode(x)
|
|
tmp <- readBin(tmp, "character")
|
|
jsonlite::fromJSON(tmp, flatten=flatten, ...)
|
|
|
|
}
|
|
|