Как вставить обратную косую черту, за которой следует одинарная кавычка, используя paste0 в R?

Я пытаюсь отделить элементы в векторе с\и запятой, используя paste0. Например:

test_vector = c("test1", "test2", "test3") 

Я хотел бы использовать paste0 для создания следующего вывода:

\ 'test1 \',\'test2 \',\'test3 \'

потому что символ обратной косой черты сам является символом escape,

paste0(test_vector, collapse = "\', \'")

генерирует следующее:

"test1 ',' test2 ',' test3"

Ответ 1

Как насчет

(x <- paste0("\\'", test_vector, "\\'", collapse = ", "))
# [1] "\\'test1\\', \\'test2\\', \\'test3\\'"

Мы можем проверить фактический результат с помощью cat() (так как вторая обратная косая черта присутствует только при печати на консоли).

cat(x)
# \'test1\', \'test2\', \'test3\'