I have a .csv where the encoding returns \"unknown\" and \"UTF-8\" when using Encoding(data). The text looks like this:
You could do something like this:
library(stringi)
string <- "<U+1042><U+1040><U+1042><U+1040> <U+1019><U+103D><U+102C>\n\n<U+1010><U+102D><U+102F><U+1004><U+1039><U+1038><U+103B><U+1015><U+100A><U+1039><U+1000><U+102D><U+102F><U+101C><U+1032> <U+1000><U+102C><U+1000><U+103C>"
cat(stri_unescape_unicode(gsub("<U\\+(....)>", "\\\\u\\1", string)))
Which results in:
၂၀၂၀ မွာ
တိုင္းျပည္ကိုလဲ ကာကြ