5.4 Tabela

Existe a possibilidade de mostrar dados em formato de tabela, como na figura abaixo:

Figura 5.5: Questão contendo uma tabela.

^{_{Fonte da figura: O autor}}

E o código em RMarkdown:

```{r dgp, include = FALSE}
library(exams)
library(magrittr)
library(knitr)
options(scipen = 999) #prevent scientific notation 

## RANDOM DATA 
x <- seq(from = 20, to = 60, by = 5)
y <- 2.5 + 1.5*x + rnorm(length(x)) %>% round(2)

## SOLUTION
c_ang <- lm(y~x) %>% coef() %>% .[2] %>% round(3)
```

Question
========
Considere os valores listados na tabela abaixo:

```{r table, echo=FALSE}
kable(data.frame(x,y), align="cc")
```

Calcule o coeficiente angular da reta linear.

Solution
========
O coeficiente angular da reta é igual a `r c_ang`

Meta-information
================
exname: angular
extype: num
exsolution: `r c_ang`
extol: `r c_ang * 0.10`

download exemplo table.Rmd

Em ## RANDOM DATA são criados dois vetores x e y.

Seguindo com o código:

```{r table, echo=FALSE}
kable(data.frame(x,y), align="cc")
```

estes valores são plotados em formato de tabela utilizando a função kable, que recebe um data.frame composto por estes dois vetores. A opção align="cc modifica a formatação para centralizada.