aagarw30

## Load required packages

library(plotly)
library(ggplot2)
library(shiny)

## Defining a key column in mtcars which will be used for event handling in event_data()
mtcars$key <- row.names(mtcars)