# NOT RUN {
# Label Detection (default), with maximum 7 results returned per image
imagePath <- system.file(
"extdata", "golden_retriever_puppies.jpg", package = "googleCloudVisionR"
)
gcv_get_image_annotations(imagePaths = imagePath, maxNumResults = 7)
# Face detection
imagePath <- system.file(
"extdata", "arnold_wife.jpg", package = "googleCloudVisionR"
)
gcv_get_image_annotations(imagePaths = imagePath, feature = "FACE_DETECTION")
# Google Cloud Storage URI as input
gcv_get_image_annotations("gs://vision-api-handwriting-ocr-bucket/handwriting_image.png")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab