Пакет colorspace, использующий библиотеку colorspace от Ihaka, предлагает несколько цветовых палитр (rainbow_hcl, terrain_hcl, heat_hcl, …), отличающихся от стандартных палитр RGB. Более того, он предлагает графический пользовательский интерфейс, где вы сможете конструировать собственные цветовые палитры.
Пакет доступен для всех основных операционных систем (Windows, OSX, Linux) и занимает всего несколько Мб на диске.
Установка пакета производится с помощью команды:
> install.packages('colorspace')
Теперь рассмотрим небольшой пример, в котором строится точечный график для иллюстрации базовых принципов работы с пакетом.
> ## Генерируем некоторые синтетические данные
> x1 <- mean="2);</span" rnorm="">
> y1 <- mean="1);</span" rnorm="">
> x2 <- mean="3);</span" rnorm="">
> y2 <- mean="2);</span" rnorm="">
> x3 <- mean="1);</span" rnorm="">
> y3 <- mean="3);</span" rnorm="">->->->->->->
> x1 <- mean="2);</span" rnorm="">
> y1 <- mean="1);</span" rnorm="">
> x2 <- mean="3);</span" rnorm="">
> y2 <- mean="2);</span" rnorm="">
> x3 <- mean="1);</span" rnorm="">
> y3 <- mean="3);</span" rnorm="">->->->->->->
> ## Загружаем пакет colorspace
> library('colorspace')
> library('colorspace')
> ## Вызываем функцию choose_palette. Замечание: открывается интерактивный GUI
> pal <- choose_palette="" span="">
Loading required namespace: dichromat->
> pal <- choose_palette="" span="">
Loading required namespace: dichromat->
> ## Выбираем три различных цвета из палитры
> colors_A <- pal="" span="">->
> colors_A <- pal="" span="">->
> ## И выбираем три цвета из палитры HCL rainbow
> colors_B <- rainbow_hcl="" span="">->
> colors_B <- rainbow_hcl="" span="">->
> ## Создаем график, включающий два подграфика
> par(mfrow=c(1,2))
> par(mfrow=c(1,2))
> ## Строим точечный график в наших собственных цветах
> plot(c(x1,x2,x3),c(y1,y2,y3),type='n',xlab='x values', ylab='y values',main='Example A: scatterplot')
> points(x1,y1,col=colors_A[1])
> points(x2,y2,col=colors_A[2])
> points(x3,y3,col=colors_A[3])
> plot(c(x1,x2,x3),c(y1,y2,y3),type='n',xlab='x values', ylab='y values',main='Example A: scatterplot')
> points(x1,y1,col=colors_A[1])
> points(x2,y2,col=colors_A[2])
> points(x3,y3,col=colors_A[3])
> ## Тот же график с цветами rainbow_hcl
> plot(c(x1,x2,x3),c(y1,y2,y3),type='n',xlab='x values', ylab='y values',main='Example B: scatterplot')
> points(x1,y1,col=colors_B[1])
> points(x2,y2,col=colors_B[2])
> points(x3,y3,col=colors_B[3])
> plot(c(x1,x2,x3),c(y1,y2,y3),type='n',xlab='x values', ylab='y values',main='Example B: scatterplot')
> points(x1,y1,col=colors_B[1])
> points(x2,y2,col=colors_B[2])
> points(x3,y3,col=colors_B[3])
Комментариев нет:
Отправить комментарий