GoogleImage2Array 0.99.1
Last modified: 2021-09-28 10:41:20
Compiled: Tue Sep 28 10:41:23 2021
library(GoogleImage2Array)
library(EBImage)
library(magrittr)
GoogleImage2array
function provide an array of images via google image search.
#Search by persian cat
query <- "persian cat"
CatImg <- GoogleImage2array(query)
#show info
str(CatImg)
#Search by Shiba inu
query <- "Shiba inu"
DogImg <- GoogleImage2array(query)
#show info
str(DogImg)
#Bind arrays
ImgDat <- unname(EBImage::abind(CatImg$array, DogImg$array, along=1))
#show info
str(ImgDat)
display.array
show a result as a tiled image.
#show CatImg
display.array(CatImg)
#show DogImg
display.array(DogImg)
## R version 4.1.0 (2021-05-18)
## Platform: x86_64-apple-darwin17.0 (64-bit)
## Running under: macOS Catalina 10.15.7
##
## Matrix products: default
## BLAS: /Library/Frameworks/R.framework/Versions/4.1/Resources/lib/libRblas.dylib
## LAPACK: /Library/Frameworks/R.framework/Versions/4.1/Resources/lib/libRlapack.dylib
##
## locale:
## [1] ja_JP.UTF-8/ja_JP.UTF-8/ja_JP.UTF-8/C/ja_JP.UTF-8/ja_JP.UTF-8
##
## attached base packages:
## [1] stats graphics grDevices utils datasets methods base
##
## other attached packages:
## [1] BiocStyle_2.20.2
##
## loaded via a namespace (and not attached):
## [1] bookdown_0.24 digest_0.6.27 R6_2.5.1
## [4] jsonlite_1.7.2 magrittr_2.0.1 evaluate_0.14
## [7] stringi_1.7.4 rlang_0.4.11 jquerylib_0.1.4
## [10] bslib_0.3.0 rmarkdown_2.11 tools_4.1.0
## [13] stringr_1.4.0 xfun_0.26 yaml_2.2.1
## [16] fastmap_1.1.0 compiler_4.1.0 BiocManager_1.30.16
## [19] htmltools_0.5.2 knitr_1.34 sass_0.4.0