Question

我有一张这样的桌子：

Students(id, grade_course_a, grade_course_b, grade_course_c)

我想在R中创建一个频率测试，以查看任意两个课程之间的相关性。我知道如何使用R中的table函数获得频率。现在，我希望用户能够通过下拉菜单选择课程。从我所看到的，我需要一个UI文件和一个服务器文件，但是我很难理解如何做。你能指出我正确的方向吗？

Answer 1

对于简单的视觉检查，交互式绘图可能就足够了？单击图例可以隐藏痕迹。

library(reshape2)
library(plotly)

Students <- data.frame(stud_id=seq(30), grade_course_a=round(runif(30, 1, 6)), grade_course_b=round(runif(30, 1, 6)), grade_course_c=round(runif(30, 1, 6)))

moltenStudents <- melt(Students, "stud_id", 2:ncol(Students))
moltenStudents$grade <- LETTERS[moltenStudents$value]

plot_ly(moltenStudents,
        x = ~stud_id,
        y = ~value,
        color = ~variable,
        text = ~grade,
        type = 'scatter',
        mode = 'lines'
)

使用Shiny为R应用程序设置输入

1 个答案: