add option to select google vision feature "SAFE_SEARCH_DETECTION"

[lucasbruscato]

No description provided.

[toledobastos]

Just add the call to the extractResponse() function. It's working well here:

if (feature == "SAFE_SEARCH_DETECTION") {
return(pp$content$responses$safeSearchAnnotation)
}