mutate_(df, .dots = paste0("x", 1:4, "_", 1,"+x", 1:4, "_", 2))df是你的data.framemutate_ 先library(dplyr)mutate_(x, .dots = paste0("paste(x", 1:4,"_", 1, ",x", 1:4, "_", 2, ",sep='/')"))x是你的data.frame前三推打太快,忘記改成你要你的格式,抱歉mutate_之後 再重新命名跟選你需要的column出來即可
t(apply(data,1,function(x)paste0(x[seq(1,length(x),2)],"/",x[seq(2,length(x),2)])))data放你的資料~~
3Q!! 沒看到 修改一下 第一個seq(2,length(x),2)第二個seq(3,length(x),2)