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

# \dontrun{ gvision_init()
#> Succesfully initialized authentification credentials.
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')
#> [1] "Sending API request(s).."
#> Error in check_error(request): API Error 400: API key not valid. Please pass a valid API key.
temp_file_path <- tempfile(fileext = '.json') save_json(results, temp_file_path)
#> Error in save_json(results, temp_file_path): object 'results' not found
# }