相关疑难解决方法(0)

如何将元素插入向量?

我有一个逻辑向量,我希望在特定索引处插入新元素.我在下面提出了一个笨拙的解决方案,但有更简洁的方法吗?

probes <- rep(TRUE, 15)
ind <- c(5, 10)
probes.2 <- logical(length(probes)+length(ind))
probes.ind <- ind + 1:length(ind)
probes.original <- (1:length(probes.2))[-probes.ind]
probes.2[probes.ind] <- FALSE
probes.2[probes.original] <- probes

print(probes)
Run Code Online (Sandbox Code Playgroud)

[1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
Run Code Online (Sandbox Code Playgroud)

print(probes.2)
Run Code Online (Sandbox Code Playgroud)

[1]  TRUE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE
[13]  TRUE  TRUE  TRUE  TRUE  TRUE
Run Code Online (Sandbox Code Playgroud)

所以它有效,但看起来很难看 - 有什么建议吗?

r

42
推荐指数
4
解决办法
7万
查看次数

R在符号更改之前标识行

我有一个矢量:

df <- c(5,9,-8,-7,-1)
Run Code Online (Sandbox Code Playgroud)

如何在更改符号之前识别位置?即df[2]

r

7
推荐指数
1
解决办法
1536
查看次数

R:只有当键值相同时,如果密钥在连续的行中重复,如何对行中的值求和?

我有这个结构的以下数据表:

+-------------------+
| id  | key | value |
+-----+-----+-------+
| 1   | A   | 1000  |
| 1   | A   | 2000  |
| 1   | B   | 2001  |
| 1   | A   | 2002  |
| 1   | A   | 2004  |
| 2   | B   | 2002  |
| 2   | C   | 2002  |
+-------------------+
Run Code Online (Sandbox Code Playgroud)

我的目标是通过id和key对值进行求和,而不是仅仅通过id和key进行分组,我只想在连续行的id和key对相同的情况下对值进行求和.

结果应该是:

+-------------------+
| id  | key | value |
+-----+-----+-------+
| 1   | A   | 3000  |
| 1 …
Run Code Online (Sandbox Code Playgroud)

r data.table

5
推荐指数
1
解决办法
1437
查看次数

标签 统计

r ×3

data.table ×1