一些背景知识。\n我从提供公共交通数据的 API 中提取数据。它以 json 格式返回结果，我使用库“jsonlite”对其进行处理。
\n\n resp <- GET(url = url)\n\n\n resp_char <- rawToChar(resp$content)\n parsed <- fromJSON(resp_char, flatten = T)\n\n parsed.df <- do.call(what = "rbind", args = lapply(parsed[1], as.data.frame))\n问题是，结果中没有特殊字符。
\n\n我正在 Windows Server 2012 计算机上工作，R 中的语言设置如下所示：
\n\n > Sys.getlocale()\n[1] "LC_COLLATE=German_Germany.1252;LC_CTYPE=German_Germany.1252;LC_MONETARY=German_Germany.1252;LC_NUMERIC=C;LC_TIME=German_Germany.1252"\n例子：
\n\n > df$direction\n"U Alt-Mariendorf (Berlin)" \n"U Alt-Tegel (Berlin)" \n"U Alt-Mariendorf (Berlin)" \n"U Alt-Tegel (Berlin)" \n"M\xc3\x83\xc2\xa4rkisches Viertel, Wilhelmsruher Damm"\n第五个结果的预期结果是“M\xc3\xa4rkisches Viertel, Wilhelmsruher Damm”
\n\n之后我查看了实际的编码。
\n\n> Encoding(df$direction)\n [1] "unknown" "unknown" "unknown" "unknown" "UTF-8"\n在我看来，到目前为止这看起来不错，但尽管如此我还是看不到特殊字符。 …