# install.packages("scholar", lib="D:/R.Rstudio/R/R-3.6.1/R-3.6.1/library")
library("scholar")
jn = c("bioinformatics",
"methods in ecology and evolution",
"molecular biosystems",
"molecular biology and evolution")
get_impactfactor(jn)
jn <- agrep("frontiers",
scholar:::impactfactor$Journal,
ignore.case=T,
value=T, max.distance=0.05)
jn
get_impactfactor(jn)
通过这样,我们可以得到frontiers系列相关期刊的影响因子。
R> get_impactfactor(jn)
# A tibble: 49 x 4
Journal Cites ImpactFactor Eigenfactor
<chr> <dbl> <dbl> <dbl>
1 FRONTIERS IN ECOLOGY AND THE ENVIRO~ 9137 8.30 0.0162
2 FRONTIERS IN NEUROENDOCRINOLOGY 3924 6.88 0.00604
3 Frontiers in Immunology 16999 5.51 0.0675
4 Organic Chemistry Frontiers 3810 5.46 0.0112
5 Inorganic Chemistry Frontiers 2147 5.11 0.00548
6 Frontiers in Oncology 6599 4.42 0.0242
7 Frontiers in Cellular Neuroscience 7825 4.3 0.0316
8 Frontiers in Chemistry 1183 4.16 0.00407
9 Frontiers in Genetics 6378 4.15 0.0288
10 Geoscience Frontiers 1580 4.05 0.00622
# ... with 39 more rows
网友评论