Temata position: TEMATA, Tug — Details and current position — MMSI 512319000

 # Удалить легенду для формы точки
p+scale_shape(guide=FALSE)
# Удалить легенду для размера
p +scale_size(guide=FALSE)
# Удалить легенду для цвета
p + scale_color_manual (значения = c («# 999999», «# E69F00», «# 56B4E9»),
                       руководство=ЛОЖЬ) 

Понравилась эта статья? Я был бы очень признателен, если бы вы помогли его распространению, отправив его по электронной почте другу или поделившись им в Twitter, Facebook или Linked In.

Подарите мне немного любви с помощью кнопок «Нравится» ниже… Спасибо и, пожалуйста, не забудьте поделиться и прокомментировать ниже!

Avez vous aimé c этой статьей? Je vous serais très reconnaissant si vous aidiez à sa диффузия en l’envoyant par courriel à un ami ou en le partageant sur Twitter, Facebook или Linked In.

Montrez-moi un peu d’amour avec les like ci-dessous .

Software Carpentry: Программирование среднего уровня с помощью R

Настройка внешнего вида графика с помощью тем

Цели обучения

• Добавить заголовок и метки осей к графику
• Используйте темы для изменения внешнего вида сюжета
• Изменить положение легенды

Мы научились преобразовывать наши данные в визуализацию с помощью ggplot2. Тем не менее, мы не потратили много времени на настройку внешнего вида сюжета. Неудивительно, что ggplot2 также предлагает эти возможности.

Маркировка графика

Мы можем добавить заголовок и метки осей, используя функцию ggplot2 labs (для меток). Давайте изменим график, созданный нами на прошлом уроке, который показывал среднее количество твитов статей в журнале.

 tweets_point <- ggplot(tweets_per_journal, aes(x = журнал, y = среднее)) +
  геометрическая_точка() +
  geom_errorbar(aes(ymin = среднее - sem, ymax = среднее + sem), ширина = 0,1) +
  geom_text (aes (метка = число), hjust = 0, vjust = 0) +
  labs(title = "Количество твитов статей в журнале",
       x = "Журнал PLOS", y = "Среднее количество твитов (+/- SEM)")
tweets_point 

Использование встроенных тем

По умолчанию вся графика ggplot2 имеет серый фон с белыми линиями сетки. Это известно как theme_gray() , но мы можем легко изменить это, если у нас есть другие предпочтения. Есть несколько других встроенных тем, которые можно применить, добавив их на график.

 tweets_point + theme_minimal() # Минимальная тема 

 tweets_point + theme_bw() # Черно-белая тема 

 tweets_point + theme_classic() # Классическая тема 

Если мы планируем создать несколько графиков, которым нужна одна и та же тема, мы можем использовать

 theme_set (theme_bw())
tweets_point 

Изменение легенды

Теоретически любой аспект сюжета можно изменить. Но запоминать, как управлять каждой особенностью сюжета, не стоит усилий. Это может быть довольно сложно, и вам, скорее всего, потребуется внести лишь несколько изменений. Поскольку ggplot2 очень популярен, существует множество онлайн-ресурсов, объясняющих, как выполнять определенные задачи.

Здесь мы покажем некоторые распространенные модификации легенды. Мы будем использовать наш график цитирований в 2011 году по сравнению с загрузками PDF.

 p <- ggplot(исследование, aes(x = log10(pdfDownloadsCount + 1),
                          у = log10(wosCountThru2011 + 1))) +
  geom_point (aes (цвет = журнал)) +
  geom_smooth() +
  scale_x_continuous (разрывы = c (1, 3), метки = c (10, 1000)) +
  scale_y_continuous (разрывы = c (1, 3), метки = c (10, 1000))
p 

 geom_smooth: method="auto" и размер наибольшей группы >=1000, поэтому используется gam с формулой: y ~ s(x, bs = "cs"). Используйте «method = x», чтобы изменить метод сглаживания.
 

По умолчанию легенда размещается справа от графика. Мы можем контролировать это, используя аргумент legend.position для темы . Мы можем использовать ключевое слово, такое как «слева», «справа», «сверху» или «снизу».

 p + theme(legend.position = "top") 

 geom_smooth: method="auto" и размер наибольшей группы >=1000, поэтому использование gam с формулой: y ~ s(x, bs = "cs" ).  Используйте «method = x», чтобы изменить метод сглаживания.
 

Мы можем указать положение центра легенды относительно всего графика, где (0, 0) — нижний левый угол, а (1, 1) — верхний правый.

 p + theme(legend.position = c(0.25, 0.75)) 

 geom_smooth: method="auto" и размер наибольшей группы >=1000, поэтому использование gam с формулой: y ~ s(x, bs = "кс"). Используйте «method = x», чтобы изменить метод сглаживания.
 

Или мы можем удалить легенду.

 p + theme(legend.position = "none") 

 geom_smooth: method="auto" и размер наибольшей группы >=1000, поэтому использование gam с формулой: y ~ s(x, bs = "cs" ). Используйте «method = x», чтобы изменить метод сглаживания.
 

Наконец, мы можем сохранить легенду, но удалить только заголовок легенды, задав аргументу legend.title значение element_blank .

 p + theme(legend.title = element_blank()) 

 geom_smooth: method="auto" и размер самой большой группы >=1000, поэтому использование gam с формулой: y ~ s(x, bs = "cs" ).