Nothing
## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## -----------------------------------------------------------------------------
library(tinyscholar)
## ---- eval=FALSE--------------------------------------------------------------
# scholar_search("Shixiang Wang")
# #> Searching author Shixiang Wang
# #> Using API server: https://api.scaleserp.com
# #> Using Shixiang's personal API key, only 125 free searches per month for all packages users
# #> Search times used: 38
# #> Search times left: 87
# #> id
# #> 1 FvNp0NkAAAAJ
# #> desc
# #> 1 Wang, Shixiang (王诗翔)ShanghaiTech. UniversityVerified email at shanghaitech.edu.cnCited by 127
## -----------------------------------------------------------------------------
profile <- tinyscholar("FvNp0NkAAAAJ")
str(profile, max.level = 1)
## ----eval = inherits(profile, "ScholarProfile")-------------------------------
tb <- scholar_table(profile)
tb$citations
tb$publications
## ---- eval = inherits(profile, "ScholarProfile"), fig.align='center', fig.width=5, fig.height=3.5----
pl <- scholar_plot(profile)
pl$citations
pl$publications
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.