I there! I wanted to see if anyone can help me with the selected output. I cannot make it work. It only Works when I give it "choices" like:
choices=c("confirmed", "deaths", "recovered"), selected="confirmed"
But when the "choices" are element of a dataframe column, selected is not working.
Here is my code for User Interface. I know you can´t check it in your consoles because you don´t have the csv, but maybe you can see my error in the code:
ui <- fluidPage(
titlePanel(h1(strong("5. Country Evolution"), align = "center")),
sidebarLayout(
sidebarPanel(
selectInput("country",
"Please, before using the application, choose a country:",
choices = coronavirus_daily$Country.Region,
selected = "Spain"
)
),
It appears that(with any country selected):
And I want to be plotted that when I run the app:
Thank ypu very much in advance!
Rubén.