如何在R Sweave块输出中显示行号？

Question

我正在Sweave中编写一个文档，并希望在最终的PDF 中使用代码行回显R代码块。但是，我似乎无法将行号作为块选项。有谁知道如何在chunk回声中包含代码行？

例如，当块回显到pdf中时，如何获得以下块以包含2个行号（1和2）？

<<echo = T, eval = T>>=
amount <- 5
5 * amount
@