R ggplot facet_wrap output неразборчивый

У меня возникли проблемы с получением facet_wrap для вывода моих диаграмм четким способом. Я не совсем уверен, есть ли способ настроить каждую диаграмму так, чтобы она соответствовала данным. Мой фрейм данных представляет собой набор весов, принимаемых в разное время в течение дня, но каждая дата может иметь несколько результатов или многих.R ggplot facet_wrap output неразборчивый

головка (DF) Результаты:

Date Time SKU Weight 
1 1/6/2016 9:37 10142 28.70 
2 1/6/2016 9:38 10142 27.45 
3 1/6/2016 9:38 10142 30.60 
4 1/6/2016 9:39 10142 30.60 
5 1/6/2016 9:39 10142 35.30 
6 1/6/2016 9:40 10142 28.25

Данные продолжается в течение 6 месяцев, я хотел бы представить каждую дату в одном линейном графике. Мой подход был ggplot и facet_wrap. Возможно, это не тот подход, который я должен принять, поэтому я открыт для предложений.

 p10142 <- ggplot(wtData10142, aes(x = Time, y = Weight)) 
    (p10142 + geom_line() + facet_wrap(~ Date, ncol = 10))

Jumbled Mess of Line Graphs

Любая помощь будет принята с благодарностью.

источник

2016-06-30 Matt S.

Поделитесь 'dput()', а не 'head()', потому что мы не можем видеть класс переменных с 'head()' , См. [Как создать воспроизводимый пример] (http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example). Убедитесь, что вы преобразовали данные в соответствующий класс даты/времени. Похоже, теперь это фактор. – MrFlick

При условии, что ваши даты получаются правильно построенными (т. Е. Если 'Time' является классом' chron :: times'), это выглядит нормально; вам просто нужно сделать вывод действительно большим с помощью 'ggsave', чтобы вы могли видеть, что у вас есть. На самом деле, я не вижу преимущества фасетки здесь, по сравнению с длинным сюжетом Weight ~ datetime. – alistaire

MrFlick, вы правы, это факторы. Я буду конвертировать и повторять. –

попробовать это

library(reshape2) 
    t <- read.csv(file = "book1.csv", header = T, sep = ",") 
    te <- melt(t) 
    ggplot(t, aes(x = Time, y = Weight, color = Date)) + geom_line()

источник

2016-06-30 20:53:49

К сожалению, это не то, что я ищу. Это так же неразборчиво, как и многие графы facet_wrap. –

ggplot (t, aes (x = вес, y = дата, цвет = дата)) + geom_line() дает результат, где все даты являются линиями по оси Y после расплава –

А что-то вроде этого, где вы установили scales = "free_y":

p10142 <- ggplot(wtData10142, aes(x = Time, y = Weight)) + 
    geom_line() + facet_wrap(~ Date, ncol = 10, scales = "free_y"))

Это позволит вашей оси у к fuctuate независимо в каждой из ваших граней. Возможно, вы также можете установить некоторые ограничения с помощью scale_x_continuous(). Помогло бы иметь полный набор данных, используемый для построения ...

источник

2016-07-01 03:01:35 Nate

R ggplot facet_wrap output неразборчивый

ответ

Смежные вопросы