如何在 Shiny 中创建具有固定 y 轴值的条形图?
How to create a bar chart with a fixed y-axis value in Shiny?
我刚刚学习 Shiny 一个星期。我检查了ggplot2的功能,但直到现在我还没有找到解决方案。
现在输出条形图如下所示:
每当我改变滑块的值时,图表也会改变,但对于它的 y 轴,我希望它的值始终固定(例如 0 到 20000)。
现在我滑动滑块后,它会自动按比例变化(比如0到6000)。在这种情况下,用户不会意识到数据改变了多少。
这是我的剧情代码的一部分:
q=ggplot(meantb_bar,aes(x = yi, y = Error_Square))+
geom_bar(stat = "identity",fill="deepskyblue3") +
labs(x = "yi", y = "(y_i-y^)^2")+ #useless for this question
geom_text(aes(label = Error_Square)) #useless for this question
ggplotly(q,width=500)
你可以使用ggplot的ylim
来固定y范围:
q=ggplot(meantb_bar,aes(x = yi, y = Error_Square))+
geom_bar(stat = "identity",fill="deepskyblue3") +
labs(x = "yi", y = "(y_i-y^)^2")+ #useless for this question
geom_text(aes(label = Error_Square)) +#useless for this question
ylim(0, 20000)
ggplotly(q,width=500)
我刚刚学习 Shiny 一个星期。我检查了ggplot2的功能,但直到现在我还没有找到解决方案。 现在输出条形图如下所示:
每当我改变滑块的值时,图表也会改变,但对于它的 y 轴,我希望它的值始终固定(例如 0 到 20000)。
现在我滑动滑块后,它会自动按比例变化(比如0到6000)。在这种情况下,用户不会意识到数据改变了多少。
这是我的剧情代码的一部分:
q=ggplot(meantb_bar,aes(x = yi, y = Error_Square))+
geom_bar(stat = "identity",fill="deepskyblue3") +
labs(x = "yi", y = "(y_i-y^)^2")+ #useless for this question
geom_text(aes(label = Error_Square)) #useless for this question
ggplotly(q,width=500)
你可以使用ggplot的ylim
来固定y范围:
q=ggplot(meantb_bar,aes(x = yi, y = Error_Square))+
geom_bar(stat = "identity",fill="deepskyblue3") +
labs(x = "yi", y = "(y_i-y^)^2")+ #useless for this question
geom_text(aes(label = Error_Square)) +#useless for this question
ylim(0, 20000)
ggplotly(q,width=500)