Fatal编程技术网
  • r/
  • 在单元格R中添加值

在单元格R中添加值

r

在单元格R中添加值,r,dataset,cell,add,R,Dataset,Cell,Add,我有一个专栏，介绍了旅馆房间里的床的类型，但我想知道有多少人可以睡在这个房间里。我的数据集如下所示： nrofP 2||2 3||3 1 6 1||1 2||2||2||2||2 5 2||2||1 我的预期结果是： nrofP 4 6 1 6 2 10 5 5 我希望您可能知道

我有一个专栏，介绍了旅馆房间里的床的类型，但我想知道有多少人可以睡在这个房间里。我的数据集如下所示：

        nrofP
         2||2
         3||3
            1
            6
         1||1
2||2||2||2||2
            5
      2||2||1
我的预期结果是：

nrofP
    4
    6
    1
    6
    2
   10
    5
    5
我希望您可能知道解决我的问题的方法。

library（lazyeval）

library(lazyeval)

df <- data.frame(nrofP = c("2||2", "3||3", "1", "2||2||1"), stringsAsFactors = F)

df$nrofP <- lapply(gsub("||", "+", df$nrofP, fixed = T), function(x) lazy_eval(x))


df
库（lazyeval）

df将nrofP视为一个向量


sapply(nrofP,function(x) sum(as.numeric(unlist(strsplit(gsub('\\|\\|',' ',x),' ')))))



将nrofP视为一个向量


sapply(nrofP,function(x) sum(as.numeric(unlist(strsplit(gsub('\\|\\|',' ',x),' ')))))



房间
房间与我的方法类似。和我的方法相似。酷东西