Создание потокового графа в R

Question

Я хотел бы визуализировать мой фрейм данных, который содержит 5 числовых значений, которые меняются со временем. Я хотел бы визуализировать это, используя потоковую диаграмму, но я, кажется, не делаю это правильно.

Вот официальный сайт пакета R для создания таких графиков, но я не очень знаком с ним. Я успешно установил его, и примеры работают нормально, но я не могу создать тот, который мне нужен.

Я также создал новый фрейм данных, в котором каждое числовое значение в отдельной строке имеет формат "ключ-значение-год", но на самом деле для них столбец "год" - это не год, а конкретный период времени. это 30 минут, но он меняется со временем, поэтому он должен подходить для этой ситуации.

Я пробовал что-то вроде этого:

library(streamgraph)
tcc1_df %>% 
  streamgraph(key = "char", value = "value", year = "HfHr", interactive = TRUE) %>% 
  sg_colors("Reds")

Можете ли вы помочь мне, как это сделать? Или вы можете предложить мне какой-нибудь другой способ визуализации данных такого типа (в R)?

Заранее спасибо.

Пример фрейма данных:

    min    avgvar_diff    avg     avgvar_sum   max
1  0.066  0.253732018  0.5538182  0.8539043   1.757
2  0.066  0.263114709  0.4832727  0.7034307   1.646
3  0.066  0.230794382  0.4575455  0.6842965   1.607
4  0.067  0.211000618  0.4048182  0.5986357   1.618

Пример нового фрейма данных (tcc1_df):

        char      value     HfHr
1       min     0.0660000    1
2  avgvar_diff  0.2537320    1
3       avg     0.5538182    1
4   avgvar_sum  0.8539043    1
5       max     1.7570000    1
6       min     0.0660000    2
7  avgvar_diff  0.2631147    2
8       avg     0.4832727    2
9   avgvar_sum  0.7034307    2
10      max     1.6460000    2

Answer 1

Вам нужно использовать date вместо year в призыве к streamgraph, И вам также нужно определить scale как "continuous" потому что по умолчанию "date",

Так что вызов должен выглядеть примерно так:

tcc1_df %>% 
streamgraph(key = "char", value = "value", date = "HfHr", 
            scale = "continuous", interactive = TRUE) %>% 
sg_colors("Reds")