Este documento ha sido creado como prueba de publicación en RPubs como parte del ejercicio 10 de la asignatura Software para Análisis de Datos.

x <- c(1,2,3,4,5)
summary(x)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##       1       2       3       3       4       5
plot(x, main="Gráfico de ejemplo")