plotting multiple charts in rPivotTable

Question

I want to plot multiple columns in rPivotTable.

Here is my dataset.

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)

see here for pivot Table 1

see here for pivot Table 2

I want to see the variations of Sales with promotions using a line Chart using rPivotTable. But I am not able to simultaneously visualize both the variables. Is there any way?

Answer 1

If data_plot is reshaped from wide to long format, both variables can be plotted in one chart:

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

For reshaping, the melt() function from the data.table is used here.

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