# \donttest{
# Path to example JSON files included with the package
input_path <- system.file("extdata/json_files", package = "duet")
# Temporary output directory
output_path <- tempfile("output_csv")
dir.create(output_path)
# Run the function using the provided data
op_create_csv(
input_path = input_path,
output_path = output_path,
model = "body",
include_filename = TRUE,
include_labels = TRUE,
frame_width = 1920,
export_type = "dyad"
)
# }
Run the code above in your browser using DataLab