ggplot2 - это активно поддерживаемый пакет для рисования диаграмм с открытым исходным кодом для R, написанный Хэдли Уикхемом и основанный на принципах «Грамматики графики». Он частично заменяет основной сюжет R и пакет решетки, обеспечивая при этом чистый, мощный, ортогональный и забавный API.

Подробнее про ggplot2...

Я пытаюсь построить диаграмму, в которой одна серия представляет собой столбец, а другая - линию с точками. Когда я рисую данные, используя приведенный ниже код, он рисует так, как я хочу. Однако на диаграмме нет легенды. Есть ли способ заставить легенду появиться? Добавление show.legend = T и gr....
12 Окт 2021 в 00:31
Я хочу создать таблицу gt, в которой я вижу некоторые показатели, такие как количество наблюдений, среднее значение и медиана, и мне нужен столбец с его гистограммой. Для этого вопроса я буду использовать набор данных радужной оболочки глаза. Я недавно научился помещать сюжет в тиббл с помощью этог....
11 Окт 2021 в 22:55
Я сделал следующие 3 графика в R: #create data a = abs(rnorm(100,10,10)) b = abs(rnorm(100,10,10)) i = 1 c = data.frame(a,b,i) c$col = as.factor(ifelse(c$b>10,"red", "blue")) a = abs(rnorm(100,10,10)) b = abs(rnorm(100,10,10)) i = 2 d = data.frame(a,b,i) d$col = as.factor(ifelse(d$a>10,"red", "blue....
9 Окт 2021 в 20:52
Дан кадр данных df следующим образом: structure(list(date = c("2018-1-31", "2018-2-28", "2018-3-31", "2018-4-30", "2018-5-31", "2018-6-30", "2018-7-31", "2018-8-31", "2018-9-30", "2018-10-31", "2018-11-30", "2018-12-31", "2019-1-31", "2019-2-28", "2019-3-31", "2019-4-30", "2019-5-31", "2019-6-30"....
9 Окт 2021 в 08:49
Я делаю график, используя ggplot2 и небольшой фреймворк df. В моем фрейме данных есть групповая переменная Letter и две числовые переменные X и Y (я включаю dput() версию df в конце этого сообщения). Моя основная проблема возникает, когда я пытаюсь выровнять метки полос сверху. Из-за моего дизайна....
8 Окт 2021 в 21:48
Воспроизводимый код R library(ggplot2) library(metR) v <- reshape2::melt(volcano) g <- ggplot(v, aes(Var1, Var2)) + geom_contour(aes(z = value), color = "white", size = 1.25, breaks = c(100, 110, 120, 130, 140, 150, 160, 170, 180, 190)) + geom_contour(aes(z = value, linetype = ife....
8 Окт 2021 в 17:06
Есть еще пара сообщений по той же теме, но предложенные решения не подходят для моего случая. Учитывая такой фрейм данных ddff <- structure( list( SampleID = structure( 20:16, .Label = c( "S39", "S30", "S35", "S22", "S23", "S26",....
7 Окт 2021 в 00:13
Я хотел бы добавить 2 разные кривые регрессии, полученные из разных моделей, в диаграмму рассеяния. Воспользуемся примером ниже: Weight=c(12.6,12.6,16.01,17.3,17.7,10.7,17,10.9,15,14,13.8,14.5,17.3,10.3,12.8,14.5,13.5,14.5,17,14.3,14.8,17.5,2.9,21.4,15.8,40.2,27.3,18.3,10.7,0.7,42.5,1.55,46.7,45.3,....
6 Окт 2021 в 19:19
У меня есть сюжет на языке R с использованием ggplot, например, следующего вида. Как я могу сгруппировать цвета графика, например, все Control , имеющие один и тот же цвет, и Обработанные , имеющие другой цвет? Таким образом, всего два разных цвета. Наверное, для этого мне нужно использовать гр....
6 Окт 2021 в 06:00
У меня проблема с ggplot и цветными метками #example data: names<-c("a","albert","aline","d","francis") value<-c(11,10,9,9,21) c<-c("black","red","red","black","red") df<-data.frame(names,value,color) Я пытаюсь сделать действительно простой штриховой график с цветными метками (здесь для примера м....
5 Окт 2021 в 15:28
У меня есть график, сгруппированный по цвету со значениями в тексте над каждой точкой. Однако я бы хотел, чтобы надпись была черным, так как ее трудно читать. Могу ли я получить помощь в изменении цвета текста с geom_text () на черный без потери позиционирования? Добавление color = "black" в geom_....
5 Окт 2021 в 11:42
Рассмотрим список ggplots: list1 <- vector("list", 7) names(list1) <- LETTERS[1:7] list1 <- lapply(list1, function(x) {x <- ggplot(data.frame()) + geom_point() + xlim(0, 10) + ylim(0, 100);x}) Я мог бы использовать list1 <- lapply(list1, function(x) {x <- x + annotate("text", label="some text", x=4....
4 Окт 2021 в 19:13
Я пытаюсь создать два параллельных графика для сравнения значений (одно абсолютное значение и одно пропорции). Мне удалось создать несколько простых графиков, но я не могу понять, нужно ли мне их оборачивать или использовать сетку? Я все время получаю ошибки. Мои данные выглядят примерно так: rece....
4 Окт 2021 в 04:02
Мой код: library(tidyverse) library(lubridate) library(ggplot2) category <- c("apple", "apple", "apple","orange", "orange","orange") mean_diameter_cm <- c(5.2,6.4,6.0, 9.2,8.6,8.1) location <- c("Farm A","Farm B", "Farm C","Farm A","Farm B", "Farm C") myfruit_data <- data.frame(category, mean_diame....
3 Окт 2021 в 00:18
Я хочу отправить участникам моей когорты их конкретные результаты, показанные в графическом виде. Есть более сотни участников с несколькими временными точками, способ, которым я надеюсь отправить их, - это покрасить их конкретные точки данных в красный цвет и сохранить идентификаторы других образцо....
2 Окт 2021 в 23:21
Я хочу сделать таблицу цветов Манселла для фишек, используемых в World Color Survey. Должно получиться так: Необходимую информацию можно найти на странице WCS, здесь, I сделайте следующие шаги: library(munsell) # https://cran.r-project.org/web/packages/munsell/munsell.pdf library(ggplot2) # take....
2 Окт 2021 в 23:15
Я попытался установить цвет точек в ggplot, но что-то не работает. Вот упрощенная версия кода. library(tidyverse) get_point_color <- function(x) { if(x <= 10) s <- "red" if((x > 10) & (x <= 20)) s <- "orange" if((x > 20) & (x <= 50)) s <- "blue" s } mtcars %>% ggplot(aes(mpg, disp)) + ....
2 Окт 2021 в 16:08
Итак, у меня возникла проблема с тем, что когда я экспортирую PDF-файл определенного типа сюжета, сюжет рисуется с рамкой вокруг него. Например, если я создам такой сюжет: library(reshape) library(ggplot2) library(ggnewscale) # Create matrix set.seed(1701) a <- sample(1:10,100, replace=TRUE) s <- ....
1 Окт 2021 в 16:48
Я пытаюсь добавить греческие буквы в легенду о моем GGPLOT. Ниже мой подход library(ggplot2) set.seed(1) Dat = rbind(data.frame(var1 = 'x1', var2 = rnorm(10000, 10, 3)), data.frame(var1 = 'x2', var2 = rnorm(10000, 10, 3))) Dat %>% ggplot() + geom_histogram(data = Dat, aes(x =....
1 Окт 2021 в 16:16
Вот воспроизводимый пример того, что я пробовал; library(tidyverse) set.seed(1453) iris %>% group_by(Species) %>% summarise(Sepal.Width=mean(Sepal.Width)) %>% sample_n(2) %>% ggplot(aes(x=Species,y=Sepal.Width,fill=Species))+ geom_bar(stat='identity',show.legend=F)+ geom_label(aes(label=scales....
28 Сен 2021 в 13:16
Я хотел динамически создавать содержимое tab в rmarkdown. Я создал in_tabs, который, кажется, работает для всего, кроме ggplot графиков. Принцип его работы заключается в создании кода Rmd, необходимого для отображения вложенных списков во вкладках. Следующий воспроизводимый пример показывает проблем....
28 Сен 2021 в 00:57
В принципе, у меня есть тепловая карта, на которой есть несколько точек. Что я пытаюсь сделать, так это автоматически изменить размер точек разумным способом для тепловых карт разного размера. Например, если у меня есть тепловая карта, которая выглядит так: library(reshape) library(ggplot2) librar....
27 Сен 2021 в 16:32
Я хотел упорядочить значения оси Y, и при этом мои полосы ошибок больше не помещались на оси Y. Код ниже, если я запускаю только ggplot вниз, я получаю полосы ошибок в нужном месте, если я запускаю все, удаляя Kale_Nutrients из ggplot, полосы ошибок смещаются по оси Y ось. Kale_Nutrients %>% arr....
27 Сен 2021 в 11:12
Мне очень жаль, что я не знаю, как сделать воспроизводимый пример, когда прошу здесь о помощи. Поэтому я предоставляю приведенный ниже код и данные; <350 КБ здесь (данные: https://easyupload.io/1r5xuo), если можно посмотреть. Моя проблема: я хочу иметь два десятичных значения R2 (показанных на п....
27 Сен 2021 в 09:41
Итак, во-первых, я очень новичок в Р. Я прошел 50 метров и считал виды, которых видел с 5-метровыми интервалами. Каждому человеку была присвоена ценность в метрах в зависимости от того, где он был обнаружен. Теперь я пытаюсь отобразить количество найденных видов в зависимости от расстояния, но на ....
26 Сен 2021 в 06:17