Test if a string contains valid JSON. Characters vectors will be collapsed into a single string.
validate(txt)
JSON string
#Output from toJSON and serializeJSON should pass validation
myjson <- toJSON(mtcars)
validate(myjson) #TRUE
#Something bad happened
truncated <- substring(myjson, 1, 100)
validate(truncated) #FALSE
Run the code above in your browser using DataLab