-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy path7-2_graficos.r
121 lines (72 loc) · 4.59 KB
/
7-2_graficos.r
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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
################################################################################
### R BASICS WORKSHOP ###
### EJERCICIO 7-2: Gráficos ###
### ###
### Unida de Servicios Bioinformáticos ###
### Instituto Nacional de Medicina Genómica ###
### Website: github.com/hachepunto/R_Basics_workshop ###
################################################################################
## TAREA 1 ##
# Cargue el set de datos de "Iris" de Edgar Anderson
# Los siguientes argumentos se describen en la página de ayuda de la función
# "plot.default": "xlim" y "ylim." Utilize ambos argumentos en este código para
# modificar la gráfica resultante, la misma que muestra la relación entre dos
# variables morfológicas para especies de Iris:
plot(iris$Petal.Width, iris$Sepal.Width)
## TAREA 2 ##
# Vaya a la página de ayuda para la función "plot" y lea sobre estos 6 argumentos:
# "type", "main", "sub", "xlab", "ylab", y "asp". Utilice esa información para
# modificar el código anterior utilizando todos los cinco argumentos.
## TAREA 3 ##
# Considere este cambio en el código de la tarea 2:
plot(iris$Petal.Width, iris$Sepal.Width, xlab="Petal Width (cm)",
ylab="Sepal Width (cm)", cex.axis=1.5, cex.lab=1.5, bty="n", pch=19)
# Note el uso del argumento "bty". Vaya a la página de ayuda para la función
# "par" y lea sobre este argumento. Cambiar el valor dado al argumento "bty" en
# el código anterior para ver los resultados que son posible para diferentes
# valores de "bty".
## TAREA 4 ##
# El siguiente código difiere del código de la Tarea 3 sólo en el uso del
# argumento "type":
plot(iris$Petal.Width, iris$Sepal.Width, xlab="Petal Width (cm)",
ylab="Sepal Width (cm)", cex.axis=1.5, cex.lab=1.5, bty="n", pch=19, type="n")
# Lea sobre el argumento "type" en la ayuda para la función "plot" para
# aprender lo que pasó. A continuación, utilice el código anterior como punto de
# partida para representar gráficamente la relación entre el ancho del sépalo y
# el ancho del pétalo mostrando cada especie con un símbolo y color diferente.
# Vea la lista de símbolos disponibles a través del argumento "pch" en la página
# 44 de "R para principiantes". Vea también la descripción del argumento "pch"
# en la página de ayuda para la función "par". Para ver una lista de colores
# disponibles escriba "colours()". Para completar esta tarea es necesario que
# utilice la función de "points" y que ponga en practica sus conocimientos sobre
# indexación de objetos.
## TAREA 5 ##
# Añada una leyenda al gráfico que ha creado en la Tarea 4 usando la función
# "lengend". Obtenga información acerca de esta función visitando la página de
# ayuda correspondiente.
## TAREA 6 ##
# Examine los datos de longitud del sépalo y ancho del pétalo utilizando
# este código:
summary(iris$Sepal.Length)
summary(iris$Petal.Width)
# Considere cuidadosamente el siguiente código que produce histogramas de
# longitud del sépalo y ancho del pétalo en el mismo gráfico:
hist(iris$Sepal.Length, breaks=seq(0,8,0.5), col="gray70", border="gray40",
xlab="", ylab="", main="", xaxt="n", yaxt="n", ylim=c(0,40))
par(new=TRUE)
hist(iris$Petal.Width, breaks=seq(0,8,0.5), density=30, xlab="", ylab="",
main="", xaxt="n", yaxt="n", ylim=c(0,40))
# Lea en la página de ayuda para la funcion "par" la información sobre el
# argumento "new". Use de las funciones "axis", "mtext" y "legenda" para agregar
# ejes, títulos de ejes y una leyenda.
## TAREA 7 ##
# El gráfico que ha creado en la tarea 5 puede tener un problema: el eje Y es
# demasiado corto y deja parcialmente fuera una de las barras del histograma.
# Modifique los valores en el argumento "ylim" para solucionar este problema.
# Puede haber también un segundo problema: el título del eje vertical se puede
# estar cortado. Utilice el argumento "mar" de la función "par" para solucionar
# este segundo problema. Lea sobre el argumento "mar" en la página de ayuda de
# la función "par".
################################################################################
### SOLUCIONES PARA TAREAS #####################################################
################################################################################