我正在使用该函数ifelse()来操作日期向量.我期望结果是类Date,并且很惊讶地得到了一个numeric向量.这是一个例子:
dates <- as.Date(c('2011-01-01', '2011-01-02', '2011-01-03', '2011-01-04', '2011-01-05'))
dates <- ifelse(dates == '2011-01-01', dates - 1, dates)
str(dates)
Run Code Online (Sandbox Code Playgroud)
这尤其令人惊讶,因为在整个向量上执行操作会返回一个Date对象.
dates <- as.Date(c('2011-01-01', '2011-01-02', '2011-01-03', '2011-01-04','2011-01-05'))
dates <- dates - 1
str(dates)
Run Code Online (Sandbox Code Playgroud)
我应该使用其他功能来操作Date矢量吗?如果是这样,有什么功能?如果没有,我如何强制ifelse返回与输入相同类型的向量?
帮助页面ifelse表明这是一个功能,而不是一个错误,但我仍然在努力寻找一个解释我发现的令人惊讶的行为.
require(plyr)
require(dplyr)
set.seed(8)
df <-
data.frame(
v1 = runif(10, -1,1),
v2 = runif(10, -1,1))
Run Code Online (Sandbox Code Playgroud)
问题:我怎样才能获得正确的值到min()功能的一部分mutate()-基本上,我想分配v3为v1具有最小的划分v1和v2.这不起作用:
df <-
df %>% mutate(v3=ifelse(v1 !=0, v1/min(v1,v2), 0))
Run Code Online (Sandbox Code Playgroud)
我想我错过了一些非常简单的事情.