如何制作没有尖括号“＆gt;”的sweave文档在代码块前面？

Question

如何生成不带尖括号的Sweave（或pgfSweave）文档“＆gt;”在代码块前面？我希望人们能够直接从pdf输出中剪切和粘贴我的代码。这是我的文档片段，带有代码块：

请注意，因为我们的关联矩阵由0和1组成，所以非对角线条目表示公共列的总数，这正是我们想要的。我们将使用％*％运算符告诉R执行此操作。让我们首先看一个使用他们所属的人和团体的玩具数据的小例子。我们将使用table（）函数将数据强制转换为关联矩阵，然后将关联矩阵乘以其转置以获得人与人之间的共同组数。

>\> ToyDat <- data.frame(person = c("Sam", "Sam", "Sam", "Greg", "Tom", "Tom"), group = c("a", "b", "c", "a", "b", "c"), stringsAsFactors = F)
>\> ToyDatM <- as.matrix(table(ToyDat)) 
>\> ToyDatM

但我希望代码看起来像：

> ToyDat <- data.frame(person = c("Sam", "Sam", "Sam", "Greg", "Tom", "Tom"), group = c("a", "b", "c", "a", "b", "c"), stringsAsFactors = F)    
> ToyDatM <- as.matrix(table(ToyDat)) 
> ToyDatM

Answer 1

我认为脚本顶部的options(prompt = " ")会执行此操作。

prompt（在options()中）控制在交互式会话中用于提示的文本字符串，我假设它将对通过Sweave处理的文档执行相同的操作。

编辑：感谢Ben Bolker指出options(prompt = " ", continue = " ")也会处理“+”问题。

Answer 2

也许更好的策略是在你的Rnw文件上提供Stangle的结果 - 它将包含来自整个文档的命令，作为可以提交给R或剪切和粘贴的脚本进入R会议。