绘图代码不能按预期工作

时间:2014-05-03 13:24:34

标签: r plot

我有兴趣根据我的测试制作两个显示测试结果的图表。 在测试中,我存储了3个向量:

  • 一个向量R,其中包含1表示正确答案,-1表示错误答案,0表示未答复问题
  • 向量Q,其包含在单元阵列Q中收集的问题,使得Q的每个元素包含一个问题。
  • 一个向量T,其中包含回答问题所花费的时间,并且与Q和R的顺序相同。

这些例子可以是:

R = [1 -1 1 1]
Q = {'Q1','Q2','Q3','Q4'}
T = [5.22 5.44 7.23 2.33]

我将要做的是:

  • “时间与得分” - 在x轴上的时间和在y轴上的得分的图。    x轴以0开始,以用户选择最后一个答案的时间结束。    分数是结果的累积分数,正确答案给出1分,    并且错误的答案给出-1分。

  • “问题编号与时间的关系” - 在x轴上显示问题编号的条形图     时间在y轴上。 x轴按照询问顺序显示问题。     y轴显示在问题上花费的时间。正确和错误的答案     用不同的颜色区分。

我当前的代码是这样的,但它没有按预期工作:

subplot(2,1,1)
plot(T,R)
title('Time vs. score')
xlabel('Time')
ylabel('Score')
grid on


subplot(2,1,2)
bar(T,colorcodeF)
title('Question number vs. time')
xlabel('Question number')
ylabel('Time')

任何sugestions?

1 个答案:

答案 0 :(得分:0)

"问题编号与时间的关系"可以用这样的ggplot2来解决

R <- c(1, -1, 1, 1)
Q <- c("Q1", "Q2", "Q3", "Q4")
T <- c(5.22, 5.44, 7.23, 2.33)
D <- data.frame(R, Q, T)

library(ggplot2)

ggplot(D, aes(Q,T)) + geom_bar(stat="identity", aes(fill=factor(R)))

关于&#34;时间与得分&#34;,我不太明白你想要绘制的内容。也许你想要这样的东西

ggplot(D, aes(T[order(T)], cumsum(R[order(T)]))) + geom_point()

作为@ user3598942的评论,该问题的标题并不具备丰富的信息:(