-
Notifications
You must be signed in to change notification settings - Fork 3
/
Copy pathrmarkdownDemo.Rmd
63 lines (46 loc) · 1.9 KB
/
rmarkdownDemo.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
---
title: "Ejemplo de Rmarkdown básico"
date: "`r format(Sys.time(), "%Y-%m-%d")`"
output:
pdf_document: default
html_document: default
word_document: default
---
# Primera Sección
Esto es texto con *cursiva*, **negrita**, con un [https://www.comillas.edu/icai](enlace).
+ Este es la primera línea de una lista.
+ Y esta es la segunda.
## Subsección
En esta subsección vamos a incluir una ecuación en \LaTeX:
$$\int_0^{\infty}\dfrac{dx}{1 + x^2} = \dfrac{\pi}{4}$$
y vamos a insertar una figura:
![](./fig/colimbo.png)
# Usando código en R...
Ahora vamos a incluir un bloque (*chunk*) de código en R, que simplemente suma dos números:
```{r }
a <- 2
b <- 3
a <- b
```
El documento procesado incluye tanto el bloque de código como el resultado.
También podemos incluir código en R dentro del texto (sin separarlo en un bloque), como en esta operación $a^b =$ `r a^b`.
Vamos a ver otro bloque de código más interesante que elige al azar dos números enteros $a$ y $b$ entre 1 y 20 y luego los multiplica.
```{r}
(a <- sample(1:20, 1))
(b <- sample(1:20, 1))
a * b
```
A continuación, un fragmento de código más complejo que lee los valores de un fichero de datos csv externo, calcula su tabla de frecuencia y pinta el diagrama de barras correspondiente:
```{r echo=-(1:3)}
# set.seed(2020)
# x = sample(1:7, 300, replace = TRUE, prob = sample(1:40, 7))
# write.table(data.frame(x), file="../data/datos01.csv", row.names = FALSE)
datos <- read.csv("./data/datos01.csv")
table(datos$x)
barplot(table(datos$x), col = terrain.colors(7))
```
Es muy fácil decidir si mostramos u ocultamos los bloques de código. Por ejemplo, la siguiente figura muestra el histograma de unos datos procedentes de una distribución normal, pero el código que genera esa figura permanece oculto.
```{r echo=FALSE, fig.height=3}
set.seed(2020) # Para obtener resultados reproducibles
hist(rnorm(1000), breaks = 20)
```