Change style of rpivottable output

Question

this is my shiny output of my rpivottable output.

now

I want to have it like this. The combination of the frames on the left side to select the items.

future

What is the necessary option to change the style?

  output$table2 <- renderRpivotTable({
  rpivotTable(db2, aggregatorName = "Count")})

Thanks

Talcom

Answer 1

Just add whatever variables you want from db2 to be as rows and columns for example

rpivotTable(db2, aggregatorName = "Count",rows=c("Metric.ID", 
"Object.Name"),cols=c("Metric.Name","Grouping"))