第 10 章 中文亂碼

假設字串A的內容是中文亂碼，可試用以下兩種方式解決：

Encoding(A) <- "UTF-8" # 此函數為generic replacement，A內容會被改掉，不用另外回存A

tmcn::toUTF8(A) -> A 

10.1 範例

load(url("https://github.com/tpemartin/course-108-1-inclass-datavisualization/blob/master/%E4%BD%9C%E5%93%81%E5%B1%95%E7%A4%BA/homework1/graphData_homework2019-10-07_001.Rda?raw=true"))

在Windows下可能出現亂碼的是：

• colnames(graphData$Case_10_result)

• graphData$Case_10_result$六都

方法一

A <- colnames(graphData$Case_10_result) # 把有問題的字串叫A
Encoding(A) <- "UTF-8"
A -> colnames(graphData$Case_10_result) # 記得把轉好的A存回源頭

A <- as.charater(graphData$Case_10_result$`六都`) # Encoding只對character class有效，此變數為factor，所以要先改class
Encoding(A) <- "UTF-8"
A -> graphData$Case_10_result$六都

# graphData$Case_10_result %>% View

方法二

A <- colnames(graphData$Case_10_result) # 把有問題的字串叫A
tmcn::toUTF8(A) -> A
A -> colnames(graphData$Case_10_result) # 記得把轉好的A存回源頭

A <- graphData$Case_10_result$`六都` # tmcn::toUTF8可應付廣義class，無需轉class
tmcn::toUTF8(A) -> A
A -> graphData$Case_10_result$`六都`

# graphData$Case_10_result %>% View