问题描述
在网站中,我试图从网站顶部显示的下拉列表中选择“英语”语言。我可以打开下拉菜单,但未从下拉菜单中选择值(“英语”)。我非常接近,但似乎缺少一些简单的东西。
#Done Manually:
accuracies <- c(
mean (predictions[,1] == mnist_27$test$y),mean (predictions[,2] == mnist_27$test$y),3] == mnist_27$test$y),4] == mnist_27$test$y),5] == mnist_27$test$y),6] == mnist_27$test$y),7] == mnist_27$test$y),8] == mnist_27$test$y),9] == mnist_27$test$y),10] == mnist_27$test$y))
#Done with the for loop:
accuracies <- for (i in 1:10) {
mean (predictions[,i] == mnist_27$test$y)
}