小编Jef*_*ler的帖子

我正在寻找一个通用形式的字符串,其中方括号表示字符串的"部分".例如:

x <- "[a] + [bc] + 1"

并返回一个如下所示的字符向量:

"[a]"  " + "  "[bc]" " + 1"

编辑:结束使用此:

x <- "[a] + [bc] + 1"
x <- gsub("\\[",",[",x)
x <- gsub("\\]","],",x)
strsplit(x,",")

在生成HTML文档时,如何使我的针织.Rmd文档不包装代码？每当我编织我的文件时,我得到如下输出:

您可以看到包含cbind调用的第一行被包装.这是由以下Rmd代码生成的.基本上,我希望看到生成的HTML文件看起来像在StackOverflow上这样(即使用水平滚动条).

---
title: "Title"
author: "Author"
date: "March 25, 2016"
output: html_document
---

```{r}
myveryveryveryveryverylongvariablenameanditsdataaaaaaaaaaaaaaaaaaaaaaaaaaa <- cbind(iris, iris, iris, iris, iris, iris, iris)
head(myveryveryveryveryverylongvariablenameanditsdataaaaaaaaaaaaaaaaaaaaaaaaaaa )
```

那么另外,如何在第二行的文本输出中执行此操作？我试过了,options(width=...)但这似乎只是让输出更加混乱.我想它也看起来就像它在StackOverflow上做的那样(没有包装,带有水平滚动条):

  Sepal.Length Sepal.Width Petal.Length Petal.Width Species Sepal.Length Sepal.Width Petal.Length Petal.Width Species Sepal.Length Sepal.Width Petal.Length Petal.Width Species Sepal.Length Sepal.Width Petal.Length Petal.Width
1          5.1         3.5          1.4         0.2  setosa          5.1         3.5          1.4         0.2  setosa          5.1         3.5          1.4         0.2  setosa          5.1         3.5          1.4         0.2
2          4.9         3.0          1.4         0.2  setosa          4.9         3.0          1.4 …

是否可以X使用 data.table 的“就地”方法一步将我的因子列转换为逻辑列？

myDT <- data.table(X = factor(c("true", "false")))
str(myDT)

myDT[, X := as.logical(X)] # does not work

myDT[, X := as.logical(as.character(X))] # does not work either

# but this does
myDT[, X := as.character(X)]
myDT[, X := as.logical(X)]
str(myDT)