fork download
  1. data <- "['oguma', 'makeup', u'\u0e27\u0e34\u0e15\u0e32\u0e21\u0e34\u0e19\u0e2b\u0e19\u0e49\u0e32\u0e40\u0e14\u0e47\u0e01', 'jeban',]"
  2. data
  3. gsub("u'[^[:ascii:]]+',?\\s*", "", data, perl=T)
Success #stdin #stdout 0.3s 22832KB
stdin
Standard input is empty
stdout
[1] "['oguma', 'makeup', u'วิตามินหน้าเด็ก', 'jeban',]"
[1] "['oguma', 'makeup', 'jeban',]"