如何可視化R中列表的列表？

Question

我在R中有一個非常深的列表列表。現在我想將此列表打印到標准輸出以更好地概述元素。 它應該看起來像eclipse的StatET插件顯示列表的方式。
示例列表：

l6 = list()
l6[["h"]] = "one entry"
l6[["g"]] = "nice"
l5 = list()
l5[["e"]] = l6
l4 = list()
l4[["f"]] = "test"
l4[["d"]] = l5
l3 = list()
l3[["c"]] = l4
l2 = list()
l2[["b"]] = l3
l1 = list()
l1[["a"]] = l2

這應該打印如下：

List of 1
 $ a:List of 1
  ..$ b:List of 1
  .. ..$ c:List of 2
  .. .. ..$ f: chr "test"
  .. .. ..$ d:List of 1
  .. .. .. ..$ e:List of 2
  .. .. .. .. ..$ h: chr "one entry"
  .. .. .. .. ..$ g: chr "nice"

我知道這可以通過遞歸和深度來實現。
但有沒有辦法在rapply或類似的東西的幫助下做到這一點？

Thanx提前，
馬丁

Answer 1

我想你可以通過給予你想要的東西

str(l1)