save annotation data as JSON — save

Writes raw JSON data as returned by the Google Vision API to a UTF-8 encoded local file.

save_json(annotations, file)

Arguments

annotations: An annotation object created with get_annotations.
file: Local path where the JSON data should be stored.

Value

nothing.

Examples

if (FALSE) {
 gvision_init()

 finn_image <- 'https://upload.wikimedia.org/wikipedia/en/2/2a/Finn-Force_Awakens_%282015%29.png'
 results <- get_annotations(images = finn_image, features = 'all',
                            max_res = 10, mode = 'url')
 temp_file_path <- tempfile(fileext = '.json')
 save_json(results, temp_file_path)
  }