小编Wan*_*ang的帖子

我有一个独特的角色,每个字母都跟着一个数字.例如:A1B10C5

我想把它分成letter <- c(A, B, C)并number <- c(1, 10, 5)使用R.

我有几个固定格式的字符串.

格式是一个字母后跟一个数字,例如A3B1C7D1.

但是,如果字母后面的数字是1,则该字符串将写为A3BC7D.

我想要做的是插入数字1,并将字符串转换A3BC7D为A3B1C7D1.

我的示例数据是

strings <- c("A", "A3BC3", "A2B1C")

我想得到的是:

strings_new <- c("A1", "A3B1C3", "A2B1C1")

非常感谢!

我有一个字符串：

a = c("112 271 [X];313 179 [X];125 162;123 131 [X];124 107")

我想先用分号分隔它;

b = as.list(strsplit(a, ";")[[1]])

> b
[[1]]
[1] "112 271 [X]"

[[2]]
[1] "313 179 [X]"

[[3]]
[1] "125 162"

[[4]]
[1] "123 131 [X]"

[[5]]
[1] "124 107"

然后我想按 分割b，space并将结果保存为 3 列数据框。

结果如下：

    A   B   C
1 112 271 [X]
2 313 179 [X]
3 125 162    
4 123 131 [X]
5 124 107    

我不知道该怎么做。感谢您的帮助。

我写了一个R包，它是基于dplyr. 当我运行 CMD 检查时，评估 @examples 时会弹出错误。

could not find function "%>%"\nCalls: Rresult\nExecution halted\n

我已经dplyr在描述文件中添加了，当我自己运行示例时，该包运行良好。我不知道问题出在哪里。

这是我的描述文件的一部分：

Imports:\nstats,\nutils,\ndplyr\n

事实上，在CMD检查的时候，no visible binding for global variable也出现了一些与dplyrpackage相关的注释。例如

Rresult: no visible global function definition for \xe2\x80\x98group_by\xe2\x80\x99\nUndefined global functions or variables:\ngroup_by\n

我使用以下代码删除注释：

group_by <- filter_at <- "%>%" <- NULL\n

非常感谢你的帮助

我有一个数据框，其中包含两列，Time并且Response

df = cbind.data.frame(
                     Time = c(1, 1.2, 1.9, 2.2, 2.9, 3.1, 3.2, 3.2, 3.2, 3.6, 3.9, 4, 5.1, 5.99), 
                     Response = c(1, 1, 1, 2, 3, 3, 3, 4, 3.5, 3.6, 3.3, 6, 11, 13)
                     )

我想通过在同一分钟（时间）之内对响应求和来对其进行变换。[1-2），[2-3），[3-4），[4-5）和[5及以上]。

预期的数据帧将是

dfe = cbind.data.frame(
                      time.range = c(1, 2, 3, 4, 5), 
                      Response = c(3, 5, 19.4, 6, 24)
                      )

我有一个字符串:

str = 'Mr[5]'

我想切换的位置Mr,并5在str,并得到这样的结果:

result = '[5]Mr'

我怎么能在R中这样做？