小编Hon*_*Ooi的帖子

我正在尝试Visual Studio Code.关于VS Code的一切看起来都很酷,除了一件事:.git foleder/file隐藏在VS Code中.

我经常通过修改.git配置文件来改变git设置.我无法看到.git文件真的很烦人.

有没有办法在VS Code中显示.git文件？

在R中,是否有比下面找到字符串中最后一个点的位置更好/更简单的方法？

x <- "hello.world.123.456"
g <- gregexpr(".", x, fixed=TRUE)
loc <- g[[1]]
loc[length(loc)]  # returns 16

这会找到字符串中的所有点,然后返回最后一个点,但它看起来相当笨拙.我尝试使用正则表达式,但没有走得太远.

我想知道如何在R中编写字符串连接运算符,类似于|| 在SAS中,在Java/C#中使用+或在Visual Basic中使用&.

最简单的方法是使用%创建一个特殊的运算符

`%+%` <- function(a, b) paste(a, b, sep="")

但这会导致%代码中出现许多难看的东西.

我注意到这+是在Ops组中定义的,你可以为该组编写S4方法,所以也许这样的方法就可以了.但是,我根本没有使用S4语言功能的经验.如何修改上述功能才能使用S4？

我正在安装R.我在运行时收到此错误./configure:

checking for history_truncate_file... no
configure: error: --with-readline=yes (default) and headers/libs are not available

任何提示,谢谢

我想给一个函数提供一个params参数然后附加它,这样我每次引用list元素时都可以使用a而不是params $ a.

run.simulation<-function(model,params){
attach(params)
#
# Use elements of params as parameters in a simulation
detach(params)
}

这有问题吗？如果我已经定义了一个名为c的全局变量,并且还定义了一个名为c的列表"params"的元素,其值将在attach命令之后使用？

在Visual Studio 2015中,我想将文本添加到所选文本块的每一行的末尾.我正在使用的正则表达式方法几乎可以正常工作,但并不完全正常.

这是我想要修改的示例代码:

public string nameOfGeometry
public string color
public string density

上述所有三行都需要以分号或自动实现的属性结束.这是我尝试过的:

1. 选择我想要更改的所有文本,然后按ctrl-h.
2. 切换"正常"的常规印象
3. 输入$我的正则表达式
4. 输入{get; set;}我的替换文字

这正是我想要的,除了它$在替换文本之间插入回车符(CRLF).换句话说,我上面显示的示例转换为:

public string nameOfGeometry
{get; set;}
public string color
{get; set;}
public string density
{get; set;}

如果没有添加CRLF,我该如何做到这一点？

在过去的几个月里,我参与了许多项目,在这些项目中,我使用了这个glmnet包,以适应弹性网模型.它很棒,但与大多数R建模功能相比,界面相当简陋.特别是,您必须提供响应向量和预测矩阵,而不是指定公式和数据框.你也会失去常规界面提供的许多生活质量的东西,例如对因子的敏感(？)处理,缺失值,将变量放入正确的顺序等等.

所以我通常最终编写自己的代码来重新创建公式/数据框架界面.由于客户机密性问题,我最终还是留下了这个代码,不得不再次为下一个项目编写代码.我想我也可以咬紧牙关并创建一个实际的包来做到这一点.但是,在我这样做之前有几个问题:

• 使用具有弹性网络模型的公式/数据框架界面是否存在任何问题？(我知道标准化和虚拟变量,宽数据集可能需要稀疏模型矩阵.)
• 有没有现成的包呢？

我已经阅读了文档,我试过谷歌搜索它; 它应该是一件简单的事情,但它似乎不适合我; 所以我大胆地出去询问是否有人能解释我dplyr是如何between()工作的.

# Explanation documentation
between(x, left, right)

x            A numeric vector of values
left, right: Boundary values

我理解一个向量是一维数组,所以我想c(1:7)是一个向量,对吧？我尝试使用文档中提供的示例作为模板来搜索7月至9月的航班,但以下只返回错误:

# Example from documentation cont’d
x <- rnorm(1e2)
x[between(x, -1, 1)]

# Loading the library
library(nycflights13)

# Execute my hopeless attempt at between()
flights[between(month, 7, 9)]

# Output and error message
> flights[between(month, 7, 9)]
Error in between(month, 7, 9) : object 'month' not found

我觉得这真的很愚蠢,但是理解这一点的任何帮助都将非常感激.我也会因为没有提出一个明确定义的问题而道歉; 可能很感激,除了'我不明白'之外,我真的不知道该怎么说.

前言

我通常dplyr在我的包中使用.在此之前0.7.0,我使用dplyr动词的强调版本来避免在注释期间R CMD CHECK.例如,代码:

x <- tibble::tibble(v = 1:3, w = 2)
y <- dplyr::filter(x, v > w)

本来会产生这样的R CMD CHECK说明:

* checking R code for possible problems ... NOTE
no visible binding for global variable ‘v’

相比之下,使用标准评估版:

y <- dplyr::filter_(x, ~v > w)

没有发出这样的说明.

但是,使用dplyr编程dplyr 0.7.0的插图表示在包中包含函数的适当语法(以避免注释)是:dplyr

y <- dplyr::filter(x, .data$v > .data$w)

因此,新闻文件说"不再需要每个主要动词的强调版本,因此这些功能已被弃用(但为了向后兼容性而保持不变)."

题

小插图说上面的新语法不会产生R CMD checkNOTES,"只要你还导入rlang::.data了@importFrom rlang …

我想将标记添加到从右到左书写的(乌尔都语)文本.我试图使用gsub用于此目的,但到目前为止我尝试的所有内容都不会产生所需的输出

text <- "?? ???? ??? ???? ?? ??? ??????? ??? ?? ??? ??"
pattern <- "??? ??"
replaceWith <- paste0("<somemark>", pattern, "</somemark>")
gsub(pattern, replaceWith, text)

gsub返回以下内容

?? ???? ??? ???? ?? ??? ??????? <somemark>??? ??</somemark> ??? ??

期望的输出.

如何实现所需的输出？

注意:我甚至无法在帖子中正确排版所需的输出,我不得不依赖图像.

更新:虽然mysub下面的函数正确连接字符串(在控制台中),但我仍然面临闪亮应用程序中文本顺序错误的问题.

mysub <- function(text, pattern){
beforePattern <- substr(text, 1, regexpr(pattern, text)[1]-1)
afterPattern <- substr(text, regexpr(pattern,text)[1] + nchar(pattern), nchar(text))
result <- paste(afterPattern, replaceWith, beforePattern)
result
}