WedX - журнал о программировании и компьютерных науках

Изменить легенду с помощью ggplot2 в R

В настоящее время я использую пакет ggplot для построения гистограммы нормальных переменных с наложением плотности N (0, 1). Я очень новичок в этом пакете, и код, который я использую,

x = rnorm(1000)
qplot(x, geom = 'blank') +     
  geom_histogram(aes(y = ..density.., colour = 'Histogram'), legend = FALSE, 
  binwidth = 0.5, fill = "blue") +                        
  stat_function(fun = dnorm, aes(colour = 'Density'))+
  scale_x_continuous('x', limits = c(-4, 4))+
  opts(title = "Histogram with Overlay")+
  scale_colour_manual(name = 'Legend', values = c('darkblue', 'red')) +
  scale_y_continuous('Frequency')+
  opts(legend.key=theme_rect(fill="white",colour="white"))+
  opts(legend.background = theme_rect())

Этот код создает следующую диаграмму. Как изменить легенду, чтобы линия, представляющая гистограмму, была заменена заполненным синим прямоугольником (который представляет столбцы гистограммы)? Спасибо!

Гистограмма с наложением

r histogram ggplot2
16.07.2011

  • также проверьте geom_density(). ИМХО проще чем stat_function(...). 17.07.2011

Ответы:


1

Может быть, что-то вроде этого...

dat = data.frame(x=rnorm(1000))  
ggplot(dat,aes(x=x)) + 
    geom_histogram(aes(y=..density..,fill="Histogram"),binwidth=0.5) + 
    stat_function(fun = dnorm, aes(colour= "Density")) +
    scale_x_continuous('x', limits = c(-4, 4)) + 
    opts(title = "Histogram with Overlay") +
    scale_fill_manual(name="",value="blue") + 
    scale_colour_manual(name="",value="red") + 
    scale_y_continuous('Frequency')+
    opts(legend.key=theme_rect(fill="white",colour="white"))+
    opts(legend.background = theme_blank())

Примечание. Начиная с версии 0.9.2 opts был заменен на theme. Так, например, последние две строки выше будут такими:

theme(legend.key = element_rect(fill = "white",colour = "white")) + 
theme(legend.background = element_blank())
16.07.2011
  • спасибо за комментарий, но теперь легенда как бы разбивается на две легенды, а также нет линий, разделяющих столбцы гистограммы. 17.07.2011
  • Добавление colour='black' к geom_histogram за пределами aes вернет линии на столбцах, но добавит диагональную линию в легенде. Есть две легенды, потому что именно так вы получаете то, что описали в ggplot2, конец истории. Если вам нужен очень точный контроль над легендами, придерживайтесь базовых функций построения графиков. ggplot2 сопротивляется вам здесь, потому что вы пытаетесь создать, возможно, плохую легенду или, по крайней мере, ненужную, согласно философии, лежащей в основе ggplot2. 17.07.2011
  • Аргумент key=list() для xyplot также позволяет регулировать ширину линии в легенде. 17.07.2011
  • Опечатка: theme(legend.background = elemenet_blank()), должно быть element_blank 25.11.2013
  • Я пытался, но система не позволяет такое незначительное редактирование, как минимум 6 символов, как говорится. :) 25.11.2013
    • Новые материалы
    Я хотел выучить язык программирования MVC4, но не мог выучить его раньше, потому что это выглядит сложно…
    Просто начните и учитесь самостоятельно Я хотел выучить язык программирования MVC4, но не мог выучить его раньше, потому что он кажется мне сложным, и я бросил его. Это в основном инструмент..
    Лицензии с открытым исходным кодом: руководство для разработчиков и создателей
    В динамичном мире разработки программного обеспечения открытый исходный код стал мощной парадигмой, способствующей сотрудничеству, инновациям и прогрессу, движимому сообществом. В основе..
    Объяснение документов 02: BERT
    BERT представил двухступенчатую структуру обучения: предварительное обучение и тонкая настройка. Во время предварительного обучения модель обучается на неразмеченных данных с помощью..
    Как проанализировать работу вашего классификатора?
    Не всегда просто знать, какие показатели использовать С развитием глубокого обучения все больше и больше людей учатся обучать свой первый классификатор. Но как только вы закончите..
    Работа с цепями Маркова, часть 4 (Машинное обучение)
    Нелинейные цепи Маркова с агрегатором и их приложения (arXiv) Автор : Бар Лайт Аннотация: Изучаются свойства подкласса случайных процессов, называемых дискретными нелинейными цепями Маркова..
    Crazy Laravel Livewire упростил мне создание электронной коммерции (панель администратора и API) [Часть 3]
    Как вы сегодня, ребята? В этой части мы создадим CRUD для данных о продукте. Думаю, в этой части я не буду слишком много делиться теорией, но чаще буду делиться своим кодом. Потому что..
    Использование машинного обучения и Python для классификации 1000 сезонов новичков MLB Hitter
    Чему может научиться машина, глядя на сезоны новичков 1000 игроков MLB? Это то, что исследует это приложение. В этом процессе мы будем использовать неконтролируемое обучение, чтобы..
    Для любых предложений по сайту: [email protected]