如何根据R Shiny中的按钮单击显示不同的图？

Question

假设我要在tabPanel上显示2个图。

1：

x <- seq(-4, 4, length=100)
hx <- dnorm(x)

degf <- c(1, 3, 8, 30)
colors <- c("red", "blue", "darkgreen", "gold", "black")
labels <- c("df=1", "df=3", "df=8", "df=30", "normal")

plot(x, hx, type="l", lty=2, xlab="x value",
  ylab="Density", main="Comparison of t Distributions")

2：

mean=100; sd=15
lb=80; ub=120

x <- seq(-4,4,length=100)*sd + mean
hx <- dnorm(x,mean,sd)

plot(x, hx, type="n", xlab="IQ Values", ylab="",
  main="Normal Distribution", axes=FALSE)

因此，我们有一个带有2个按钮的tabPanel，另一个是空白的tabPanel。如果单击第一个按钮，则第一个图将显示在第二个tabPanel上。如果单击第二个按钮，则第二个图将显示在第二个tabPlanel上。当然，每次单击按钮时它都应该翻转。

这怎么办？