Сохраняйте комментарии внутри с помощью Autoprint

Question

Использование withAutoprint позволяет печатать условный код (как в примерах пакета R).Однако при этом комментарии опускаются.

withAutoprint({
  x <- 1:5

  # This is how we find the average
  mean(x)
})
#> > x <- 1:5
#> > mean(x)
#> [1] 3

^{Создано в 2018-11-22 пакетом Представить (v0.2.1)}

Есть ли способ сохранить комментарии в печатном виде?