гистограмма для данных временного ряда на основе значения коэффициента (1,0) - PullRequest
2 голосов
/ 31 января 2020

У меня есть фрейм данных / таблица, которая выглядит следующим образом:

z <- tibble(Time = as.POSIXct(c(
            '2020-01-06 00:22:15',
            '2020-01-06 00:45:16',    
            '2020-01-06 00:46:37',    
            '2020-01-06 01:29:55')), 
            Value = c(0,1,0,1))

, и я хочу построить что-то вроде гистограммы, используя данные временных рядов и значений Пожалуйста, смотрите вложение, как я могу ' встроенных изображений пока нет.

1 Ответ

1 голос
/ 31 января 2020

Вы можете использовать geom_rect из ggplot2. Чтобы подготовить свой тиббл к графику, вы можете создать столбец, используемый для установки xmax, который будет соответствовать последовательному времени.

library(dplyr)
library(ggplot2)
z %>% mutate(xmax = lead(Time), y = 0) %>%
  ggplot(aes(xmin = Time, xmax = xmax, ymin = y, ymax =y+1))+
  geom_rect(aes(fill = as.factor(Value)))+
  theme(axis.text.y = element_blank(),
        legend.title = element_blank())

enter image description here

Отвечает ли он на ваш вопрос?

...