从列中提取行

Question

你好我已经合并了3个数据框的数据我想从状态栏中为每个候选人显示每个部分的前3个问题， 我在这里合并了数据＆amp;将数据子集化为具有所需列

QDiff<-Reduce(function(x, y) merge(x, y, all=TRUE), list(A, B,C))

  Qdiff1<-subset(QDiff, select = c(candidate_id,status,question_id,section_id, diff_bucket))

Answer 1

因为它是1：3的数值，我们可以使用它作为索引，用相同顺序的character s向量替换它。

Qdiff1$diff_bucket <- c('difficult', 'moderate', 'easy')[Qdiff1$diff_bucket]

如果我们需要每个候选人的前三个问题

library(dplyr)
Qdiff1 %>%
      group_by(candidate_id, section_id) %>%
      slice(1:3)