8

如何在代码块前面生成没有尖括号“>”的 Sweave（或 pgfSweave）文档？我希望人们能够直接从 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
4

2 回答 2

17

我认为options(prompt = " ")在您的脚本顶部会这样做。

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

编辑：感谢 Ben Bolker 指出这options(prompt = " ", continue = " ")也将解决“+”问题。

于 2011-05-31T02:30:26.293 回答
2

也许更好的策略是Stangle在您的 Rnw 文件中提供结果——它将包含来自整个文档的命令，作为可以提交给 R 或剪切并粘贴到 R 会话中的脚本。

于 2011-05-31T13:17:16.620 回答