R/createJsonFromData.R

In leibniz-psychology/PsychOpen-CAMA-R-package: psychopencama.zpid.de

# Load required package
library(jsonlite)

# Define the function
createJsonFromData <- function(d) {
  dat <- checkData(d)

  json_data <- toJSON(dat, pretty = TRUE, digits = NA)

  write(json_data, paste0(d, ".json"))

  }