install.packages("flexdashboard")

# 1. Stock Selection Input
selectInput("stock_symbol", 
            label = "Stock List (Pick One to Analyze)",
            choices = stock_list, 
            selected = "META")
# 2. Analyze Button
actionButton("analyze", "Analyze", icon = icon("chart-line"))
hr() # Horizontal Line

# 3. Short Moving Average Slider
sliderInput("short_mavg", 
            label = "Short Moving Average", 
            min = 5, max = 40, value = 20, step = 1)
# 4. Long Moving Average Slider
sliderInput("long_mavg", 
            label = "Long Moving Average", 
            min = 50, max = 120, value = 90, step = 1)