Мы можем использовать gsub
gsub("(\\w+) ", '"\\1",', var)
Или другой вариант: dQuote
toString(dQuote(scan(text = var, what =""), FALSE))
Для одинарной кавычки используйте sQuote
и кавычку, окружающую вся строка не будет иметь эффекта
cat(toString(sQuote(scan(text = var, what ="", quiet = TRUE), FALSE)))
#'aaa', 'bbb', 'ccc'