如何将唯一实例作为多个键分配给 R 中的字典？

Question

我有一个 R df，其中一列，赋值，如下所示：

course	instance	assignment
1	1	A
1	1	B
1	2	B
1	2	C
2	1	A
2	1	C
2	2	B
2	2	A

我需要为跨实例的课程中的所有作业创建一个超集（因为没有更好的术语）。

例如：课程 1 提供了 2 次课程，在实例 1 中包含作业 A 和 B，在实例 2 中包含作业 B 和 C。本课程的作业超集应每次包含作业 A、B 和 C .换句话说，在课程实例中至少出现一次的每个作业都应该在超集中出现一次。

更新：我已经尝试了下面的建议。

library(tidyverse); df %>% group_by(course) %>% 
summarise(all_assignments = toString(sort(unique(assignment))), 
.groups = "drop")

这将返回以下内容：

all_assignments	.groups
A	drop

我现在已经在以下示例数据集上对此进行了测试：

df <- read.table(text = "course instance    assignment
1   1   A
1   1   B
1   2   B
1   2   C
2   1   A
2   1   C
2   2   B
2   2   A", header = T)

它返回一个类似的结构：

all_assignments	.groups
A, B, C	drop

显然这个确切的代码对其他人有用，所以我想知道我做错了什么？

Answer 1

我对您的预期输出并不完全清楚（请参阅我上面的评论）；请看以下

library(dplyr)
df %>% 
    group_by(course) %>% 
    summarise(
        all_assignments = toString(sort(unique(assignment))), 
        .groups = "drop")
## A tibble: 2 × 2
#  course all_assignments
#   <int> <chr>          
#1      1 A, B, C        
#2      2 A, B, C       

这是在R_4.2.0 和dplyr_1.0.9 上测试和验证的。

---

样本数据

df <- read.table(text = "course instance    assignment
1   1   A
1   1   B
1   2   B
1   2   C
2   1   A
2   1   C
2   2   B
2   2   A", header = T)