Skip to content

Instantly share code, notes, and snippets.

@njahn82
Last active August 29, 2015 14:03
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save njahn82/654251e06ffa1b685fd4 to your computer and use it in GitHub Desktop.
Save njahn82/654251e06ffa1b685fd4 to your computer and use it in GitHub Desktop.
Demonstrate ORCID use in Europe PMC via rebi

Europe PubMed Central provides search functionality for ORCIDs and exposes ORCIDs in article metadata.

rebi is an R Interface to Europe PMC RESTful Web Service provided by rOpenSci.

Install rebi

Load most recent version

require(devtools)
install_github("rebi", "ropensci")
require(rebi)

Find publications with ORCID

my.df <- search_publications(query = 'AUTHORID:"0000-0002-7635-3473"')
dim(my.df)
## [1] 71 24
head(my.df)
##         id source     pmid      pmcid
## 1 24773781    MED 24773781       NULL
## 2 24679255    MED 24679255       NULL
## 3 24661787    MED 24661787       NULL
## 4 24862340    MED 24862340       NULL
## 5 24903359    MED 24903359       NULL
## 6 23448600    MED 23448600 PMC3605345
##                                                                                                                                  title
## 1 Integrating bioinformatic resources to predict transcription factors interacting with cis-sequences conserved in co-regulated genes.
## 2                                                                         Plant genome sequencing - applications for crop improvement.
## 3                                                     The CHH motif in sugar beet satellite DNA: a modulator for cytosine methylation.
## 4                                          Profiling of extensively diversified plant LINEs reveals distinct plant-specific subclades.
## 5          Update on transparent testa mutants from Arabidopsis thaliana: characterisation of new alleles from an isogenic collection.
## 6                           Highly diverse chromoviruses of Beta vulgaris are classified by chromodomains and chromosomal integration.
##                                                                                                                                  authorString
## 1 Dubos C, Kelemen Z, Sebastian A, Bülow L, Huep G, Xu W, Grain D, Salsac F, Brousse C, Lepiniec L, Weisshaar B, Contreras-Moreira B, Hehl R.
## 2                                                                              Bolger ME, Weisshaar B, Scholz U, Stein N, Usadel B, Mayer KF.
## 3                                          Zakrzewski F, Schubert V, Viehoever P, Minoche AE, Dohm JC, Himmelbauer H, Weisshaar B, Schmidt T.
## 4                                                         Heitkam T, Holtgräwe D, Dohm JC, Minoche AE, Himmelbauer H, Weisshaar B, Schmidt T.
## 5                                                            Appelhagen I, Thiedig K, Nordholt N, Schmidt N, Huep G, Sagasser M, Weisshaar B.
## 6                                                Weber B, Heitkam T, Holtgräwe D, Weisshaar B, Minoche AE, Dohm JC, Himmelbauer H, Schmidt T.
##           journalTitle issue journalVolume pubYear journalIssn pageInfo
## 1         BMC Genomics  NULL            15    2014   1471-2164      317
## 2 Curr Opin Biotechnol  NULL            26    2014   0958-1669    31-37
## 3              Plant J     6            78    2014   0960-7412  937-950
## 4              Plant J  NULL          NULL    2014   0960-7412     NULL
## 5               Planta  NULL          NULL    2014   0032-0935     NULL
## 6              Mob DNA     1             4    2013   1759-8753        8
##                                                     pubType isOpenAccess
## 1                                           journal article            N
## 2 journal article; review; research support, non-u.s. gov't            N
## 3                                           journal article            N
## 4                                           journal article            N
## 5                                           journal article            N
## 6                                           journal article            Y
##   inEPMC inPMC citedByCount hasReferences hasTextMinedTerms
## 1      N     N            0             Y                 N
## 2      N     N            2             Y                 N
## 3      N     N            0             Y                 N
## 4      N     N            0             N                 N
## 5      N     N            0             Y                 N
## 6      Y     N            3             Y                 Y
##   hasDbCrossReferences hasLabsLinks hasTMAccessionNumbers luceneScore
## 1                    N            N                     N    1330.388
## 2                    N            N                     N    1330.388
## 3                    N            N                     N    1330.388
## 4                    Y            N                     N    1330.388
## 5                    N            N                     N    1330.388
## 6                    Y            N                     Y   1162.4257
##                            doi
## 1     10.1186/1471-2164-15-317
## 2 10.1016/j.copbio.2013.08.019
## 3            10.1111/tpj.12519
## 4            10.1111/tpj.12565
## 5    10.1007/s00425-014-2088-0
## 6        10.1186/1759-8753-4-8

Show ORCIDs by PMID

get_author(ext_id="21625184")
##      fullName firstName  lastName initials authorId.type
## 1  Grünwald V    Viktor  Grünwald        V          <NA>
## 2   Weikert S   Steffen   Weikert        S          <NA>
## 3    Seidel C Christoph    Seidel        C          <NA>
## 4     Busch J     Jonas     Busch        J          <NA>
## 5 Johannsen A     Antje Johannsen        A          <NA>
## 6    Fenner M    Martin    Fenner        M         ORCID
## 7    Reuter C Christoph    Reuter        C          <NA>
## 8    Ganser A    Arnold    Ganser        A          <NA>
## 9 Johannsen M   Manfred Johannsen        M          <NA>
##        authorId.value   ext_id
## 1                <NA> 21625184
## 2                <NA> 21625184
## 3                <NA> 21625184
## 4                <NA> 21625184
## 5                <NA> 21625184
## 6 0000-0003-1419-2405 21625184
## 7                <NA> 21625184
## 8                <NA> 21625184
## 9                <NA> 21625184

Combine PMIDs into one query

require(plyr)
id <- c('24352233', '23928564')
my.data <- ldply(id, get_author)

# tabulate ORCIDs
table(my.data$authorId.value)
## 
## 0000-0002-5016-5191 0000-0002-7635-3473 
##                   1                   1
@mfenner
Copy link

mfenner commented Jul 3, 2014

Nice!

@njahn82
Copy link
Author

njahn82 commented Jul 3, 2014

Thank you!

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment