server <- function(input, output) {
output$plot1<-renderPlot({
if(input$univariate=="Age")
{
hist(bankchurn$Age,xlab='Age',ylab='No of Customers',col= '#45b3e0' ,main="Age")
output$text1<-renderText("hi")`enter code here`
}
if(input$univariate=="Gender")
{
ggplot(data = bankchurn) +
aes(x = Gender, fill = Gender) +
geom_bar() +
scale_fill_viridis_d(option = "plasma") +
theme_minimal()
output$text1<-renderText("Gender")
}
在上面的代码中,我的第一个“ if”语句正在渲染图,但是我的第二个使用ggplot图的if语句在仪表盘中没有渲染任何内容。知道在这种情况下如何显示ggplot图。
注意:我已经尝试过将图形存储在变量中,但仍无法在仪表板上显示它。
答案 0 :(得分:0)
请提供一个reprex-可复制的示例,其中包含一个UI元素,以便我们进一步评估需要更改的内容