Question

我从R开始，我想知道如何改变一个标志＆amp;在我的所有数据中的函数和。例如：

200&3 in 200+3.

我这样做了：

bree<-as.data.frame(sapply(bree, function(x) gsub("&", "+", x)))

但我认为它只是改变了标志，但R不是＆＃34;意思＆＃34; +

Answer 1

这真是太烂了，但它解决了你的玩具问题。需要进行一些修改才能推广：

df = data.frame(group = c("200&3","200&5","1200&3","200&6"))

bree<- data.frame("group"=apply(df, 1, function(x) {
  split_dat <- as.numeric(unlist(strsplit(x, "&")))
  '+'(split_dat[1], split_dat[2])
  }))

Answer 2

另一种hacky可能性（可能没有任何非 -hacky解决方案）：

atplusfun <- function(x) eval(parse(text=gsub("&","+",x)))
sapply(bree, atplusfun)

（这会生成一个数字向量：您可以将其转换为数据框或其他任何内容）

根据函数和更改符号

2 个答案: