построение нескольких графиков в rPivotTable

Question

Я хочу построить несколько столбцов в rPivotTable.

Вот мой набор данных.

data_plot = data.frame(month = c(1,2,3,1,2,3), SALES = c(47, 90, 23, 75, 19, 28), promotions = c(3,4,2,5,1,2))
rpivotTable(data_plot)

см. Здесь для сводной таблицы 1

см. Здесь для сводной таблицы 2

Я хочу видеть варианты продаж с промо-акциями, используя линейный график с использованием rPivotTable. Но я не могу одновременно визуализировать обе переменные. Есть ли способ?

Answer 1

Если data_plot изменен с широкого на длинный формат, обе переменные могут быть нанесены на одну диаграмму:

library(data.table)
library(rpivotTable)
rpivotTable(melt(data_plot, id.var = "month"))

Для изменения формы здесь используется функция melt() из data.table.

melt(data_plot, id.var = "month")

   month   variable value
1      1      SALES    47
2      2      SALES    90
3      3      SALES    23
4      1      SALES    75
5      2      SALES    19
6      3      SALES    28
7      1 promotions     3
8      2 promotions     4
9      3 promotions     2
10     1 promotions     5
11     2 promotions     1
12     3 promotions     2