https://github.com/kklot/paper
Get and plot paper and author profile from semanticscholar.org
https://github.com/kklot/paper
cv r semanticscholar semanticscholar-api
Last synced: about 1 year ago
JSON representation
Get and plot paper and author profile from semanticscholar.org
- Host: GitHub
- URL: https://github.com/kklot/paper
- Owner: kklot
- License: other
- Created: 2022-01-27T20:27:50.000Z (over 4 years ago)
- Default Branch: master
- Last Pushed: 2022-01-28T23:15:53.000Z (over 4 years ago)
- Last Synced: 2025-02-16T03:29:23.858Z (over 1 year ago)
- Topics: cv, r, semanticscholar, semanticscholar-api
- Language: R
- Homepage: https://kklot.github.io/paper/
- Size: 489 KB
- Stars: 0
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.Rmd
- License: LICENSE
Awesome Lists containing this project
README
---
output: github_document
---
```{r, include = FALSE}
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.path = "man/figures/README-",
out.width = "100%"
)
knitr::knit_hooks$set(crop = knitr::hook_pdfcrop)
library(ggplot2)
library(tidyr)
```
# paper
[](https://lifecycle.r-lib.org/articles/stages.html#experimental)
The goal of paper is to produce summary of publication profile of a scientist or a paper.
## Installation
You can install the released version of paper from [CRAN](https://CRAN.R-project.org) with:
```{r}
# install.packages("paper")
# not yet
```
And the development version from [GitHub](https://github.com/) with:
```{r}
# install.packages("devtools")
# devtools::install_github("kklot/paper")
library(paper)
```
## Example
This is a basic example which shows you how to solve a common problem:
### Search an author
```{r}
ath <- search_author("Van Kinh Nguyen", limit = 10)
get_paper(ath, ath$essential$authorId[1])
```
### Search a paper
- [ ] TODO - easy
### an_author
Get an author's papers
```{r}
ex_aut <- an_author(level = 'me_only')
summary(ex_aut)
ex_aut
```
Plot profile of an author
```{r, fig.width=3, fig.height=3, fig.cap="My publication profile contribution"}
plot(ex_aut)
```
Author's paper and papers cited each of those papers.
Rate limit does not allow sending more than 500 requests/minutes.
- [ ] ask for more once the package is more mature
```{r}
# ex_aut2 <- an_author(level = "me_and_cited_me")
# ex_aut2
```
### a_paper
Get all citations to a paper, number of citations to each of those paper, year, and field of study.
These are related papers.
```{r example}
ex_paper <- a_paper()
ex_paper
```
Example citation profile of a single paper. The extra margin is cropped with `pdfcrop`, see [document](https://bookdown.org/yihui/rmarkdown-cookbook/crop-plot.html) here.
```{r, crop = TRUE, width = 3, height = 3, fig.cap='Profile of all papers that cited this work'}
plot(ex_paper)
```