作者gtgrthrst (gtgrt)
看板R_Language
标题[问题] DT::datatable筛选问题
时间Fri Sep 4 15:30:13 2020
刚好最近有学弟需要近两年大寮测站的降雨资料
若是手动查询则需要大量时间
所以我就帮忙写了一段程式帮忙取得两年间的降雨资料
以下是相关的程式码
分享给大家
以後有空问题或是有空再补充资料
而目前遇到一个问题在以google sheet作为资料库中
DT::datatable中filter只能在前两栏起作用
mutate新增的第三栏无法使用filter
若是将资料调换过来也是mutate新增的栏位没有效果
https://i.imgur.com/ewkB55l.png
https://hackmd.io/cAVB2a4XRsC4SvAFhmygNQ#%E6%B8%AC%E8%A9%A6%E7%B6%B2%E5%9D%801
相关程式码
https://rstudio.cloud/spaces/81311/project/1504940
https://gist.github.com/gtgrthrst/766524776fe21eebc33f4c207a78290a
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.39.172.211 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1599204618.A.2EA.html
※ 编辑: gtgrthrst (114.39.172.211 台湾), 09/04/2020 15:31:22
※ 编辑: gtgrthrst (114.39.172.211 台湾), 09/04/2020 15:31:48
1F：推 kokolotl: mutate完塞dataframe或datatable再给DT吃呢？ 人在外面 09/04 18:29
2F：→ kokolotl: 没电脑可以测XD 09/04 18:29
3F：推 locka: 问题原因是因为DT套件在shiny里面只会 render 一次所以之後 09/04 19:11
4F：推 locka: mutate产生才会没作用 09/04 19:11
5F：→ gtgrthrst: 感谢各位建议那我尝试看看先塞在一个dataframe 09/04 20:15
6F：推 cywhale: 我其实不太确定dplyr语法 run你的code都有Error: Column 09/04 22:03
7F：→ cywhale: `Last_Week_Total` is of unsupported class data.frame 09/04 22:03
8F：→ cywhale: 但换成data.table就成功了 dt<-copy(gdata2)%>%setDT() 09/04 22:04
9F：→ cywhale: dt[`date-D`>= as.Date(input$daterange[1],"%Y-..,]%>% 09/04 22:06
10F：→ cywhale: .[,`Last_Week_Total`:=sum(`Last_Week_Total`), 09/04 22:06
11F：→ cywhale: by=.(`date-D`)]%>%DT::..很正常so请检查dplyr?那段code 09/04 22:08
12F：推 kokolotl: 我都直接不使用dplyr XD 09/04 22:36