这是一个可复制的示例，其中我使用了辅助列（temp）来生成嵌套data列。
在不使用辅助列的情况下如何获得相同的结果？我尝试使用，group_by_all但是没有用。（因此，我也不确定我是否了解group_by_all函数的用途）
df <- structure(
list(
Var1 = c(0L, 1L, 2L, 3L, 0L, 1L, 2L, 3L, 0L, 1L,
2L, 3L, 0L, 1L, 2L, 3L, 0L, 1L, 2L, 3L,
0L, 1L, 2L, 3L),
Var2 = c(0L, 0L, 0L, 0L, 1L, 1L, 1L, 1L, 2L, 2L,
2L, 2L, 0L, 0L, 0L, 0L, 1L, 1L, 1L, 1L,
2L, 2L, 2L, 2L),
Var3 = c(0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L,
0L, 0L, 1L, 1L, 1L, 1L, …