C.2 Extraer información de la BD

En siguientes ejecuciones bastará con conectar con la BD

conn <- lbsConnect(dbfilename)

C.2.1 Estadísticos descriptivos

lbsDescriptiveStats(conn)

## Number of sources in your LBS:           30787
## Number of documents in your LBS:         363
## Number of author records in your LBS:    1324
## Number of author groups in your LBS:     1
## Number of ungrouped authors in your LBS: 1324
## 
## You have chosen the following data restrictions:
##  Survey:         <ALL>.
##  Document types: <ALL>.
## 
## Surveys:
##   surveyDescription DocumentCount
## 1    Default survey           363
##   * Note that a document may belong to many surveys/files.

## Document types:
## 
##  ar  cp  ip  re  le  no  sh  er 
## 256  52  24  15   6   2   2   1

## Publication years:
## 
## 2014 2015 2016 
##    1  354    8

## Citations per document:
## 
##   0   1   2   3   4   5   6   7   9  10  11  12  15 
## 223  73  25  17  14   2   1   2   1   2   1   1   1

## Categories of documents:
##          Economics, Econometrics and Finance(all) 
##                                                 8 
##                                  Engineering(all) 
##                                                45 
##                          Arts and Humanities(all) 
##                                                 9 
##                                     Medicine(all) 
##                                                43 
##                         Chemical Engineering(all) 
##                                                10 
##                             Computer Science(all) 
##                                                35 
##   Pharmacology, Toxicology and Pharmaceutics(all) 
##                                                10 
##                                             Other 
##                                                33 
##                            Materials Science(all) 
##                                                22 
##         Agricultural and Biological Sciences(all) 
##                                                27 
##                                  Mathematics(all) 
##                                                30 
## Biochemistry, Genetics and Molecular Biology(all) 
##                                                32 
##                        Environmental Science(all) 
##                                                32 
##                              Social Sciences(all) 
##                                                32 
##                        Physics and Astronomy(all) 
##                                                19 
##                                       Energy(all) 
##                                                10 
##          Business, Management and Accounting(all) 
##                                                10 
##                                   Psychology(all) 
##                                                 8 
##                                    Chemistry(all) 
##                                                51

## Documents per author:
## 
##    1    2    3    4    5    6    7    8    9   10   11   13   16 
## 1000  224   46   18   12    8    6    1    1    2    2    1    1

C.2.2 Otra información

Se puede obtener información acerca de los documentos producidos y las citas recibidas correspondientes a cada autor:

citseq <- lbsGetCitations(conn)

## Data set restrictions:
##  Survey:         <ALL>.
##  Document types: <ALL>.
## 
## Creating citation sequences... OK, 1322 of 1322 records read.

# citseq <- lbsGetCitations(conn, surveyDescription="udc_2015")

Número de autores

length(citseq) 

## [1] 1322

head(names(citseq))

## [1] "LÓPEZ-GARCÍA X."   "MARWAH S."         "OTERO T.P."       
## [4] "IGLESIAS M.P."     "GONZÁLEZ-RIVAS D." "BARROS CASTRO J."

citseq[[4]]

## 229  11 
##   1   0 
## attr(,"IdAuthor")
## [1] 4

Se pueden seleccionar autores:

id <- lbsSearchAuthors(conn, c("Cao R.", "Naya S.", "Naya-Fernandez S."))
id

## [1]   46 1193

Obtener las citas de los trabajos de los autores seleccionados:

citseq2 <- lbsGetCitations(conn, idAuthors=id)

## Data set restrictions:
##  Survey:         <ALL>.
##  Document types: <ALL>.
## 
## Creating citation sequences... OK, 2 of 2 records read.

length(citseq2)

## [1] 2

Obtener los documentos relativos a los autores seleccionados:

id_re  <-  lbsSearchDocuments(conn, idAuthors=id)

Obtener información acerca de los documentos:

info_re <- lbsGetInfoDocuments(conn, id_re)
info_re

## [[1]]
## IdDocument:    16
## AlternativeId: 2-s2.0-84947552209
## Title:         Lifetime estimation applying a kinetic model based on the generalized logistic function to biopolymers
## BibEntry:      Journal of Thermal Analysis and Calorimetry,2015,122,3,,1203,1212
## Year:          2015
## Type:          Article
## Citations:     0
## Authors:       NAYA S./46/NA, ÁLVAREZ A./518/NA, LÓPEZ-BECEIRO J./565/NA, GARCÍA-PARDO S./624/NA, TARRÍO-SAAVEDRA J./631/NA, QUINTANA-PITA S./709/NA, GARCÍA-SABÁN F.J./978/NA
## 
## [[2]]
## IdDocument:    98
## AlternativeId: 2-s2.0-84928890357
## Title:         Bootstrap testing for cross-correlation under low firing activity
## BibEntry:      Journal of Computational Neuroscience,2015,38,3,,577,587
## Year:          2015
## Type:          Article
## Citations:     1
## Authors:       ESPINOSA N./779/NA, MARIÑO J./832/NA, CUDEIRO J./1096/NA, CAO R./1193/NA, GONZÁLEZ-MONTORO A.M./1294/NA
## 
## [[3]]
## IdDocument:    127
## AlternativeId: 2-s2.0-84939982743
## Title:         Classification of wood using differential thermogravimetric analysis
## BibEntry:      Journal of Thermal Analysis and Calorimetry,2015,120,1,,541,551
## Year:          2015
## Type:          Article
## Citations:     0
## Authors:       NAYA S./46/NA, LÓPEZ-BECEIRO J./565/NA, TARRÍO-SAAVEDRA J./631/NA, FRANCISCO-FERNÁNDEZ M./766/NA, ARTIAGA R./1112/NA

Obtener las citas de cada documento:

cit_re  <-  sapply(info_re,  function(x)  x$Citations)
cit_re

## [1] 0 1 0

etc…

El último paso será desconectar la BD…