Wush Wu
d <- read.csv("新北市統計資料_101年.csv")
print(xtable(head(d)), type = "html")
| type | name | file_name | |
|---|---|---|---|
| 1 | 環境保護 | 垃圾清運處理概況(100年以前)-年 | 垃圾.xls |
| 2 | 環境保護 | 垃圾清運處理概況(101年以後)-按處理方式分-年 | 垃圾.xls |
| 3 | 環境保護 | 垃圾清運處理概況(101年以後)-按清運單位或回收管道分 | 垃圾.xls |
| 4 | 環境保護 | 水肥清運處理概況-年 | 水肥.xls |
| 5 | 環境保護 | 環境空氣品質-年 | 空品.xls |
| 6 | 環境保護 | 公害陳情案件-年 | 公害.xls |
"type","name","file_name"
"環境保護","垃圾清運處理概況(100年以前)-年","垃圾.xls"
"環境保護","垃圾清運處理概況(101年以後)-按處理方式分-年","垃圾.xls"
"環境保護","垃圾清運處理概況(101年以後)-按清運單位或回收管道分","垃圾.xls"
http://data.taipei.gov.tw/opendata/apply/NewDataContent?oid=47C21F11-A278-4C86-BEC0-185A300D5226
f <- file("臺北市警察局名稱及地址.csv", encoding = "utf-8")
d <- read.csv(f)
## Warning: 輸入連結 '臺北市警察局名稱及地址.csv' 中的輸入不正確
read.csv("臺北市警察局名稱及地址.csv")
## Error: 無效的多位元組字串於
## '<bb>O<a5>_<a5><ab><ac>F<a9><b2>ĵ<b9><c1>`<a7><bd>'
16進位:
| 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
| 0000 | 0001 | 0010 | 0011 | 0100 | 0101 | 0110 | 0111 |
| 8 | 9 | A | B | C | D | E | F |
| 1000 | 1001 | 1010 | 1011 | 1100 | 1101 | 1110 | 1111 |
0L的記憶體,寫成hex code是 00 00 00 00 (佔有四個位元組)0.0的記憶體,寫成hex code是 00 00 00 00 00 00 00 00 (佔有八個位元組)as.raw(0)
## [1] 00
charToRaw("0")
## [1] 30
as.raw(0L)
## [1] 00
「編碼」就是將位元組合變成人類可讀文字的規則。
charToRaw)f <- file("臺北市警察局名稱及地址.csv", encoding = "big5")
d <- read.csv(f)
print(xtable(head(d)), type = "html")
| name | content | traffic_information | display_addr | poi_addr | |
|---|---|---|---|---|---|
| 1 | 臺北市政府警察局總局 | 臺北市政府警察局總局 | 臺北市延平南路96號 | 台北市延平南路96號 | |
| 2 | 大同分局 | 大同分局 | 臺北市錦西街200號 | 台北市錦西街200號 | |
| 3 | 萬華分局 | 萬華分局 | 臺北市康定路22號 | 台北市康定路22號 | |
| 4 | 中山分局 | 中山分局 | 臺北市中山北路二段1號 | 台北市中山北路二段1號 | |
| 5 | 大安分局 | 大安分局 | 臺北市仁愛路三段2號 | 台北市仁愛路三段2號 | |
| 6 | 中正第一分局 | 中正第一分局 | 臺北市公園路15號 | 台北市公園路15號 |