# source: 登革熱近12個月每日確定病例統計
# save UTF-8 "Dengue_Daily_last12m.csv" to ANSI "Dengue_Daily_last12m-ansi.csv"dataset <- read.table("Dengue_Daily_last12m-ansi.csv", header=TRUE, sep=",")
# 置換前head(dataset)sum(dataset == "None", na.rm = TRUE)dataset[dataset == "None"] <- NA
# 置換後head(dataset)sum(dataset == "None", na.rm = TRUE)