Birden çok dizeyi R? 'Deki bir gsub() veya chartr() deyiminde değiştirin.

Question

Alfabetik [a-z], boşluk [] ve kesme işareti ['] içeren bir dize değişkeni var. x <- "a'b c" Kesme işareti ['] ile boş [] yerine geçmek ve [] ile alt alanı [] değiştirmek istiyorum.

x <- gsub("'", "", x) 
x <- gsub(" ", "_", x) 

Kesinlikle çalışır, ancak çok fazla koşulum olduğunda kod çirkinleşir. Bu nedenle, chartr()'u kullanmak istiyorum, ancak chartr() boş bırakılamıyor, örn.

x <- chartr("' ", "_", x) 
#Error in chartr("' ", "_", "a'b c") : 'old' is longer than 'new' 

Bu sorunu çözmenin bir yolu var mı? Teşekkürler!

Answer 1

Ne magrittr paketinden %<>% ve %>% opperators sağlayan sözdizimi fanatiğiyim gsubfn

library(gsubfn) 
gsubfn(".", list("'" = "", " " = "_"), x) 
# [1] "ab_c" 

Answer 2

kullanabilirsiniz.

library(magrittr) 

x <- "a'b c" 

x %<>% 
    gsub("'", "", .) %>% 
    gsub(" ", "_", .) 
x 
##[1] "ab_c" 

gusbfn harika, ama ben zincirleme %>% verir gibi. Ben de, bir magrittr ve/veya dplyr çözümü tercih ederim

Answer 3

gsub("\\s", "", chartr("' ", " _", x)) # Use whitespace and then remove it 

Answer 4

. Ancak, özellikle bir işlevdeyse ve ucuz bir şekilde iade edilebiliyorsa, nesnenin yeni bir kopyasını yapmayı tercih etmiyorum.

yani

return(
    catInTheHat %>% gsub('Thing1', 'Thing2', .) %>% gsub('Red Fish', 'Blue 
    Fish', .) 
) 

... vb.