如何将元素组合成单列？

Question

我希望通过数据框group_by和连接元素形成一列，并使用新值创建一个新列：

if (element) {
  ReactDOM.render(
    <Employment />,
    element
  );
}

希望拥有

id <- c(1,1,1,1,1,1,1)
day <- c(1,1,2,2,3,4,5)
code <- c('A','B','A','B','A','A','A')
df <- data.frame(id, day, code)
df
  id day code
1  1   1    A
2  1   1    B
3  1   2    A
4  1   2    B
5  1   3    A
6  1   4    A
7  1   5    A

df %>% group_by(id, day) %>% ??

谢谢！