val1我有類似分隔符在哪里的東西,。我想拆分val1然后創建假人。如何解決這個問題。提前謝謝了。
val1 <- c("ab, cd, ef", "", "gh")
val2 <- c('John','Peter','Jolie')
data <- data.frame(val1,val2); data
預期答案
ab cd ef gh
John 1 1 1 0
Peter 0 0 0 0
Jolie 0 0 0 1
uj5u.com熱心網友回復：
在base R中，使用strsplit將基于 的 'val1',和后面的任何空格拆分為 a list，將list帶有 'val2'的名稱設定stack為兩列 data.frame 并應用table
out <- table(stack(setNames(strsplit(data$val1, ",\\s "), data$val2))[2:1])
names(dimnames(out)) <- NULL
-輸出
> out
ab cd ef gh
John 1 1 1 0
Peter 0 0 0 0
Jolie 0 0 0 1
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/473933.html
上一篇：拆分字串并查找出現百分比
下一篇：JavaScript我無法將字串引數發送給函式，即使我可以在點擊事件上使用div.innerHTML發送int引數