избежать повторений в R

Question

Вот типичная проблема, что у меня есть:

replace_letters <- function(string){ 
    gsub("x", "a", string) 
} 

string_x_new <- replace_letters("string_x") 
string_y_new <- replace_letters("strxng_y") 
string_z_new <- replace_letters("xstring_z") 
... 

Это означает, что я пишу функцию (функцию в примере произвольно), а затем я хочу, чтобы применить это к произвольному набор объектов. Что является более аккуратным способом сделать это, не повторяя функцию несколько раз (иногда у меня есть длинные списки из 10-15 вызовов одной и той же функции для разных объектов)?

Answer 1

Положите ваши строки в векторе с использованием C («string_x», «strxng_y», «xstring_z»), а затем использовать применить функцию Пример:

strings<-c("string_x", "strxng_y", "xstring_z") 

replace_letters <- function(string){ 
    gsub("x", "a", string) 
} 

strings <- sapply(strings, replace_letters) 

Answer 2

Вы можете создать векторы объектов, которые вы» d хотел бы применить функцию. Давайте возьмем ваш пример:

new.strings <- sapply(c("string_x", "string_y", "string_z"), replace_letters) 

Answer 3

Вы можете использовать векторизации АиР:

strings<-c("string_x", "strxng_y", "xstring_z") 
replace_letters(strings) 
## [1] "string_a" "strang_y" "astring_z"