Question

我在Windows 10中使用R 4.0，并且操纵滑块似乎不适用于我从视频或教科书中摘录的任何示例。

在运行下面的代码时，我没有遇到任何错误，除了看不见滑块之外，一切都正常运行。

还有其他人遇到同样的问题吗？

library(manipulate)
library(ggplot2)
library(HistData)
myHist <- function(mu){
  g <- ggplot(Galton, aes(x = child))
  g <- g + geom_histogram(fill = "salmon", 
                          binwidth=1, aes(y = ..density..), colour = "black")
  g <- g + geom_density(size = 2)
  g <- g + geom_vline(xintercept = mu, size = 2)
  mse <- round(mean((Galton$child - mu)^2), 3)  
  g <- g + labs(title = paste('mu = ', mu, ' MSE = ', mse))
  g
}
manipulate(myHist(mu), mu = slider(62, 74, step = 0.5))

Answer 1

首先运行以下：

manipulate(plot(1:5, cex=size), size = slider(0.5,10,step=0.5))

正如 this comment 在 Marco Sandri 中所建议的那样，为我解决了这个问题。

使用操纵功能时，滑块不显示

1 个答案: