在R中获取转换字符串的最简单方法是什么

Question

我具有以下格式的数据： Input

1   A
1   B
1   C
1   D
2   E
3   F
3   G
5   H
4   I
1   J
2   K
3   L
1   M

我要强制转换为： Output

1   A,B,C,D,J,M
2   E,K
3   F,G,L
4   I
5   H