RShiny app - columns and aggregates functionality

Question

I am trying to build a Starwars Pivot table in an RShiny app starwars is a readily available dataset in RStudio.

I defined the user