АК
> f <- "~/Загрузки/Telegram Desktop/StatisticLogSession_1574848708307.txt"
> uchardet::detect_raw_enc(readBin(f, raw(), file.size(f)))
[1] "UTF-16"
> ced::ced_enc_detect(readBin(f, raw(), file.size(f)))
[1] "UTF-16LE"
> uchardet::detect_file_enc(f)
~/Загрузки/Telegram Desktop/StatisticLogSession_1574848708307.txt
"UTF-16"