CAPÍTULO 6. GRAFICACIÓN CON R
139
de colores por número era limitada. Esto se debe a que, por omisión, el lengua-
je cuenta con una paleta de sólo ocho colores. La función
palette()
, permite
consultar la paleta actual o establecer una nueva. La especificación de los co-
lores en una paleta se hace por medio de los códigos hexadecimales o de los
nombre de los colores que se pretende usar. En seguida se hace la consulta de
la paleta actual y se cambia por una diferente.
# la paleta actual
palette
()
## [1] "black" "red" "green3" "blue" "cyan"
## [6] "magenta" "yellow" "gray"
# para cambiarla, por ejemplo, con los primeros
# veinticinco colores de colors()
palette
(
colors
()[
1
:
25
])
En la Fig. 6.11 se muestran los colores resultantes con la nueva paleta de
colores. A partir de aquí, los números del 1 al 25 se podrían utilizar para es-
pecificar los colores que se muestran en la figura. El tamaño máximo de una
paleta definida con esta función es de 1024 colores.
Además de lo antedicho, en el lenguaje se han desarrollado diversas paletas
de colores con fines específicos, y que son provistas o construidas por funciones
tales como:
heat.colors()
,
terrain.colors()
,
topo.colors()
,
cm.colors()
,
rainbow()
. Salvo la función
rainbow()
, todas las otras funcio-
nes tienen sólo dos argumentos,
n
y
alpha
, que son, respectivamente, el tama-
ño de la paleta y la fracción de transparencia, que es un número entre 0 y 1,
que indica el grado de opacidad de los colores en cuestión. El resultado de las
funciones, que es un vector de caracteres con los códigos hexadecimales de los
colores.
Para ilustrar lo anterior, se dibujará primeramente un conjunto de líneas
rectas con la función
abline()
, que permite, entre otras cosas dibujar líneas
a partir de su intercepto y pendiente, y posteriormente, sobre este gráfico se
dibujarán figuras de diversos colores tomados de alguna de las paletas ante-
riores, mediante la función
points()
, que sirve para agregar puntos en la for-
ma de símbolos a un gráfico previo y cuyos argumentos son similares a los de
plot()
.
# Se establece el espacio de dibujo:
plot
(
0
,
type
=
"n"
,
xlim
=
c
(
0
,
10
),
ylim
=
c
(
0
,
10
))
# Se dibujan las líneas rectas; para ello,
# se hace uso de mapply que aplica de manera
# multiple una función:
void
<-
mapply
(abline,
c
(
2
,
1
,
0
,
-
1
,
-
2
),
# interceptos por línea
rep
(
1
,
5
))
# pendiente = 1
