小编MKR*_*MKR的帖子

我需要选择所有非数字的列.我可以使用select_if以下方法轻松选择所有数字列

mtcars %>% select_if(is.numeric)

如果我想选择non-numeric列怎么办？我试过了:

mtcars %>% select_if(!is.numeric)

但我收到以下错误消息:

Error in !is.numeric : invalid argument type

非常感谢您的帮助!

R非常新,并且在确切地知道要问什么时苦苦挣扎,在这里找到了类似的问题 如何将字符向量拆分成数据框？ 但这有固定的长度,我一直无法调整我的问题

我在R中的数组中有一些数据

TEST <- c("Value01:100|Value02:200|Value03:300|","Value04:1|Value05:2|",
            "StillAValueButNamesAreNotConsistent:12345.6789|",
              "AlsoNotAllLinesAreTheSameLength:1|")

数据成对存储,我希望分成如下数据帧:

Variable Value
Value01    100
Value02    200
Value03    300
Value04    1
Value05    2
StillAValueButNamesAreNotConsistent   12345.6789
AlsoNotAllLinesAreTheSameLength     1

变量名称是一个字符串,值始终是一个数字

任何帮助都会很棒!

谢谢

我正在编写一个带有几个管道的函数.我想在最后一个管道之前将一些步骤保存为.tbl或数据框.例如:a %>% b %>% c,我想保存步骤'c',但也想要步骤'b'.

我知道一个选择是做两个管道,但我相信必须有更好的方法.

cars %>% mutate(kmh = dist/speed) %>% summary()

我需要从R的当前日期获得上个月的最后一个工作日(例如今天是5th of January 2018,所以我应该得到29th of December 2017结果)

提前致谢

"+"支持numeric,integer并Date在r.以下所有操作均有效.

> 5 + 5L
[1] 10
> Sys.Date() + 5
[1] "2018-01-18"

但+两者之间不起作用character.喜欢:

> "one" + "one"
Error in "one" + "one" : non-numeric argument to binary operator
> "What is date today? Ans:" + Sys.Date()
Error in unclass(e1) + unclass(e2) : 
  non-numeric argument to binary operator

除了numeric参数之外是否禁止允许r？或者有人可以覆盖+行为以支持其他类型的参数.