一个txt.file data
包含一个整数矩阵,每列有1000行整数。
所以,如果我们按下
data
我们得到这个输出
96520
69850
...
36884
我们可以通过此
获得随机行getnumbers <- sample(data,1, replace=FALSE)
通过在data
中获取随机行,任务是进入下一行(按a,b,c,d,e)并检查它是否正确。因此,如果我们在data
中有第k个条目,我们希望通过按下数字来获取data
中的k + 1条目,并查看它是否正确。
check <- function(a,b,c,d,e){
if( identical( data[k+1] , c(a,b,c,d,e)) == TRUE ) {
return("Correct") }
else{return("Not correct")}
如何在Shiny中实现这个R代码,以便我可以使用ubuntu进行交互?
答案 0 :(得分:1)
希望我能正确理解你的问题但是你可以做到这一点:
{{1}}