取消列出列表，同时保留索引

我有一个列表，其中可以有空条目、包含一个元素的条目和包含多个元素的条目。

l1 = list(integer(0), 11L, integer(0), integer(0), 11L, 11L, c(6L, 
36L), 16L, 16L, integer(0), integer(0))

我想取消列出 l1 并创建一个数据框，其中对于空元素，索引根本不会出现，对于多个元素，索引将出现多次：

df = data_frame(entry = c(2, 5, 6, 7, 7, 8, 9), element = c(11, 11, 11, 6, 
36, 16, 16))

例如，这里条目 7 出现两次，因为列表中有两个元素（6 和 36）。

我怎样才能做到这一点？

“低级”解决方案：

data.frame(entry=rep(seq_along(l1),lengths(l1)),element=unlist(l1))
#  entry element
#1     2      11
#2     5      11
#3     6      11
#4     7       6
#5     7      36
#6     8      16
#7     9      16