研究筆記 - 用 R 分析 LASS 資料
編輯歷史
| 時間 | 作者 | 版本 |
|---|---|---|
| 2016-07-08 08:58 – 08:58 | r117 – r118 | |
顯示 diff（7 行未修改）
*取得目前 PM2.5 > 50 的站點名稱
+ *library(rjson)
*json_file="http://nrl.iis.sinica.edu.tw/LASS/last-all-airbox.json"
*lass_data <- fromJSON(paste(readLines(json_file), collapse=""))
（23 行未修改）
|
||
| 2016-07-05 21:12 – 21:51 | r37 – r116 | |
顯示 diff（2 行未修改）
緣起
*R 是一個非常強大且開源的統計語言，很想學又一直常常學得卡卡的，趁這想分析 LASS 資料來學習
+
+ 簡易開始
+ *讀入 LASS JSON 的資料，JSON 來源請參考 LASS Data Platform
+ *取得目前 PM2.5 > 50 的站點名稱
+
+ *json_file="http://nrl.iis.sinica.edu.tw/LASS/last-all-airbox.json"
+ *lass_data <- fromJSON(paste(readLines(json_file), collapse=""))
+ *#summary(lass_data)
+ *#lass_data$feeds[[1]]
+ *v_pm25 = c()
+ *for (i in 1:length(lass_data$feeds)) {
+ * v_pm25[i] <- lass_data$feeds[[i]]$s_d0
+ * }
+ *#plot ordered pm2.5 values
+ *plot(v_pm25[order(v_pm25)])
+ *# list pm25 > 50site index
+ *idx_big <- v_pm25 > 250*#list all pm25>550site name (v)
+ *#lass_data$feeds[idx_big][[1]]$SiteName
+ *v_big_sitename = c()
+ *v_big_pm25 = c()
+ *big_list <- lass_data$feeds[idx_big]
+ *for (i in 1:length(idx_big)) {
+ * v_big_sitename[i] <-big_list[[i]]$SiteName
+ * v_big_pm25[i] <-big_list[[i]]$s_d0
+ * }
+ *v_big_sitename
學習參考資料 - R
*R 語言
- *
+ *The R Manuals
|
||
| 2016-07-05 21:12 | r36 | |
顯示 diff（8 行未修改）
|
||
| 2016-07-05 21:08 – 21:12 | r3 – r35 | |
顯示 diff（1 行未修改）
緣起
+ *R 是一個非常強大且開源的統計語言，很想學又一直常常學得卡卡的，趁這想分析 LASS 資料來學習
+
+ 學習參考資料 - R
+ *R 語言
+ *
|
||
| 2016-07-05 21:08 | r2 | |
顯示 diff（3 行未修改）
|
||
| 2016-07-05 21:08 | r1 | |
顯示 diff 研究筆記 - 用 R 分析 LASS 資料
+
+ 緣起
|
||
| 2016-07-05 21:08 | r0 | |
顯示 diff-
+ 研究筆記 - 用 R 分析 LASS 資料
|
||