library(googleCloudVisionR)
gcv_get_response(
imagePaths = c("inst/extdata/bali_small.jpeg", "inst/extdata/essex.jpg"),
feature = "IMAGE_PROPERTIES",
maxNumResults = 1
)
#> image_path red green blue score pixel_fraction color.red.1 color.green.1 color.blue.1 score.1 pixelFraction.1
#> 1: inst/extdata/bali_small.jpeg 241 178 132 0.1905586 0.01451833 198 195 198 0.8104908 0.4618453
#> 2: inst/extdata/essex.jpg 241 178 132 0.1905586 0.01451833 198 195 198 0.8104908 0.4618453