Thanks in advance for everyone's help
column(4, selectInput("selectedvariable","Select a variable:", names(data)[6:16]))
output$ggplot2Group2 <- renderPlot({
g2 <- ggplot(data = speciesGgplot1(),aes(x=OBSWEEK,y=input$selectedvariable,group = COUNTY,color=COUNTY,shape=COUNTY))+
geom_point()+
theme_bw()+
theme(
legend.position = "bottom",
) +
geom_line()
print(g2)
})
why the Y values is wrong? I feel very confused . Thanks again.