Skip to content
Snippets Groups Projects
Commit caed061e authored by Walmes Marques Zeviani's avatar Walmes Marques Zeviani
Browse files

Conclui seção de consultar as vinhetas.

parent 6add8d2c
Branches
No related tags found
No related merge requests found
...@@ -89,7 +89,7 @@ estudo de caso; detalhamento de algoritimos; ...@@ -89,7 +89,7 @@ estudo de caso; detalhamento de algoritimos;
# Consultar vinhetas # # Consultar vinhetas #
#### Vinhetas dos pacotes instalados #### ## Pacotes instalados ##
Certamente alguns dos pacotes que você tem instalado no seu SO possuem Certamente alguns dos pacotes que você tem instalado no seu SO possuem
vinheta. Se você está reproduzindo o código desse tutorial, então você vinheta. Se você está reproduzindo o código desse tutorial, então você
...@@ -99,12 +99,10 @@ você pode usar as opções ilustradas abaixo. ...@@ -99,12 +99,10 @@ você pode usar as opções ilustradas abaixo.
```{r, eval=FALSE} ```{r, eval=FALSE}
## Exibe todas as vinhetas disponíveis no console. ## Exibe todas as vinhetas disponíveis no console.
vignette() vignette()
```
```{r}
## Exibe as vinhetas de um único pacote no console. ## Exibe as vinhetas de um único pacote no console.
vignette(package = "roxygen2") vignette(package = "roxygen2")
```
```{r, eval=FALSE}
## Abre uma vinheta pelo nome (essa é do pacote roxygen2). ## Abre uma vinheta pelo nome (essa é do pacote roxygen2).
vignette(topic = "rd") vignette(topic = "rd")
vignette(topic = "rd", package = "roxygen2") vignette(topic = "rd", package = "roxygen2")
...@@ -116,7 +114,74 @@ browseVignettes() ...@@ -116,7 +114,74 @@ browseVignettes()
browseVignettes(package = "roxygen2") browseVignettes(package = "roxygen2")
``` ```
#### Vinhetas dos pacotes no CRAN #### ```{r, include=FALSE}
cap <-
"Distribuição do número de vinhetas por pacote nos pacotes oficiais do R
disponíveis no CRAN."
if (ishtml) {
cap <- fig$cap("vin", cap)
}
tb <- structure(
c(0.774686165394073, 0.171735473016695, 0.0535783615892326),
class = "table",
.Dim = 3L,
.Dimnames = structure(list(y = c("0", "1", ">1")),
.Names = "y"))
tbl <- structure(
list(px = c(5986L, 1327L, 235L, 85L, 34L, 29L, 11L, 4L, 3L, 4L, 2L,
1L, 0L, 1L, 0L, 0L, 0L, 1L, 0L, 1L, 1L, 0L, 1L, 0L, 0L,
0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L,
0L, 0L, 0L, 0L, 0L, 0L, 1L),
x = 0:45),
.Names = c("px", "x"),
row.names = c(NA, -46L),
class = "data.frame")
totPack <- sum(tbl$px)
totVin <- sum(tbl$px * tbl$x)
m <- totVin / totPack
```
## Pacotes oficiais no CRAN ##
Para os pacotes que são oficiais (que estão no CRAN), você pode
consultar as vinhetas, bem a documentação, online. Os pacotes estão no
endereço `https://cran.r-project.org/web/packages/<pacote>/index.html`,
em que `<pacote>` é um nome. Nessas páginas existe uma seção com URLs
para as vinhetas, quando disponíveis, logo abaixo da documentação em
PDF.
Nós fizemos um *web scraping* no site do CRAN e verificamos que 22.5%
dos pacotes oficiais do R tem pelo menos uma vinheta, sendo que 17.2%
tem apenas uma e 5.4% tem mais que uma, conforme a Figura
`r fig$ref("vin")`.
Existe um total de `r totVin` distribuídas em `r totPack` pacotes, o que
dá uma média de `r round(m, 2)` vinhetas por pacote. Esse *web scrap*
levou 150 minutos e foi feito no dia 04 de Janeiro de 2016.
```{r, echo=FALSE, results="hide", fig.cap=cap}
plot(px ~ x, data = tbl, type = "h", lwd = 4,
xlab = "Número de vinhetas no pacote",
ylab = "Número de pacotes")
par(fig = c(0.15, 0.95, 0.15, 1), new = TRUE)
pie(tb,
col = c("red", "orange", "yellow"),
labels = sprintf(fmt = "%s (%0.1f%s)",
c(0, 1, ">1"), 100*tb, "%"))
text(x = 0, y = 0.9, labels = "Frequência relativa", cex = 1.2)
```
Além dos pacotes oficiais existem pacotes em desenvolvimento no GitHub,
por exemplo, cuja vinheta pode também estar disponível. Esse é o caso do
pacote [breedR].
Fica aqui aquela pergunta tipo Tostines: um pacote tem mais vinhetas
por que é mais usado ou é mais usado por que tem mais vinhetas?
# Adicionando vinheta # # Adicionando vinheta #
...@@ -295,3 +360,5 @@ output em PDF. ...@@ -295,3 +360,5 @@ output em PDF.
Por fim, basta executar `check()` e `build()` mais uma vez para incluir Por fim, basta executar `check()` e `build()` mais uma vez para incluir
as vinhetas no `.tar.gz` do seu pacote. as vinhetas no `.tar.gz` do seu pacote.
[breedR]: https://github.com/famuvie/breedR/tree/master/inst/doc
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment