作者查詢 / clsmbstu
作者 clsmbstu 在 PTT [ R_Language ] 看板的留言(推文), 共170則
限定看板:R_Language
看板排序:
全部R_Language170NTUSLC139NTUSA126Python105NTUMT-97104NtuDormM196MAC46Statistics40iOS23NTU22SummerCourse14NtuDormM211TW-language10Q_ary9Bank_Service7Soft_Job7LoL6BigSanchung5Libra5NTUcourse5NTUMT-965PttEarnMoney5SayLove5CTSH97EXP4StupidClown4b974060XX2Boy-Girl2creditcard2CSCouncil2Orzhong97cl2PttBug2ToS2Agronomy-971AntiVirus1B96303XXX1B96305XXX1B97A013XX1B983022XX1B98310XXX1B99303XXX1b99902xxx1B99A012XX1car1ck61st3241CMS_97_S3F1CMU_DVLB1CMU_OHET1DC_SALE1Drama-Ticket1Free_box1geography1031KS97-3051KS97-3101KS97-3161MacShop1MLBGAME1NTU-CHKongFu1NTU-K61NTU-K71NTU-K91NTUAC981NtuDormM31NtuDormM81NTUDrama991NTUEE1111NTUfin021NTUfin031NTUJapan101NTUMCSA1PH-961PH-991PH-sea1Philo-091Philo-101PttLawSug1PYMHS_94_3031SYSOP1TFSHS66th3071THU-CHE931USC1<< 收起看板(80)
5F推: groups <- strsplit(as.character(data$Group), "?")11/12 01:20
6F→: data$Group <- sapply(groups, paste, collapse = ",")11/12 01:20
10F推: 樓上說的有可能11/06 17:33
11F→: which那邊留is.na(A3[x,55])應該就可以了 ==TRUE不需要11/06 17:39
12F→: which也一樣不需要11/06 17:39
13F→: 另外你也可以不用寫for loop,R可以對一串值同時做邏輯11/06 17:43
14F→: 運算11/06 17:43
15F→: ToBeNA <- A3[,55] < 0 | A3[,55] > 1 | is.na(A3[,55])11/06 17:47
16F→: A3[,55][ToBeNA] <- NA11/06 17:47
21F推: 剛剛試了一下andrew大的說法,可以重現錯誤,感謝!11/06 20:21
22F→: 也謝謝clansoda的ifelse11/06 20:23
3F→: 應該不需要[,] sum(data == "?", na.rm = TRUE)就可以10/17 21:21
1F→: 不能說aaa不是matrix吧 你可以試試class(aaa)10/15 10:39
2F推: R語言裡data frame跟matrix是不一樣的喔 感覺你有點混淆10/09 18:28
3F→: []裡面可以放邏輯值 data[is.na(data)]就挑出data裡是NA10/09 18:31
4F→: 的那些(就是一群NA值) 再加上<-0就把這些NA都換成0了10/09 18:32
5F→: 還是很難理解的話試試 x <- 1:10; x[x > 5] <- -5010/09 18:33
9F→: 請無視我在二樓的那句 我自己眼殘 orz10/09 21:34
13F推: 我想用scan會成功是因為scan跟read_excel給你的資料型態09/01 00:09
14F→: 不同。scan給你的是一串值(vector),read_excel給你的09/01 00:11
15F→: 是一張表(data frame,只是只有一行)。求一串值的平均09/01 00:11
16F→: 很合理,但是求一張表的平均對電腦來說就有點一頭霧水了09/01 00:12
17F→: 。這也是為什麼R會回報那些錯誤或警告訊息給你的原因。09/01 00:13
1F推: 參考一下這系列文章呢? https://goo.gl/mxB2Et08/25 12:04
5F→: 一般化很好舉例啊,例如我要一個shiny app,可以讓使用08/23 19:49
6F→: 者從vs和am選任一當facet,再任選兩個column畫散佈圖,08/23 19:51
7F→: aes還有aes_string,但就沒有facet_grid_string08/23 19:52
8F→: 需要迴圈的例子也很常見,例如我要依第一行當facet、第08/23 19:53
9F→: 二行為x、第三行起每個奇數行當y,每個存一張圖,用數列08/23 19:54
10F→: 一下就解決了,偏偏ggplot2就不給這樣玩。08/23 19:55
13F→: 不懂為什麼想要用column slice就得回原本的R繪圖......08/23 19:58
20F→: 我反而覺得是ggplot跟其它繪圖套件不友善...08/23 20:00
22F→: 既然背後都是non-standard evaluation,為什麼不開放直08/23 20:02
23F→: 接給字串或index數字?反正我一開始都給定data frame了08/23 20:02
25F→: 我想用欄名啊,啊除了aes_string以外又不吃字串08/23 20:05
27F→: names叫出來也是字串啊,不能直接給不是也很奇怪嗎?08/23 20:05
29F→: 而且這裡你給的都只限ggplot,plot_ly function呢?08/23 20:06
32F→: 我從來沒有說formula == NSE......08/23 20:50
33F→: aes的說明直接就寫了"aes uses non-standard evaluation08/23 20:52
34F→: to capture the variable names."08/23 20:52
35F→: 以shiny的例子來說,以下操作就不可能直接實現:08/23 20:54
36F→: ggplot(mtcars,aes(input$a,input$b))+geom_point()+08/23 20:55
37F→: facet_grid(. ~ input$c)08/23 20:55
38F→: 再來如果用到shiny,我也會想納入plot_ly、leaflet等互08/23 20:56
39F→: 動性更高的套件,那我也只是好奇大家都怎麼解決。08/23 20:57
43F→: 自問自答:若是ggplot2,facet_grid和facet_wrap都支援08/24 08:59
44F→: 字串輸入,但方式不同,可參考它們的"facets"參數說明08/24 09:00
45F→: 若是plotly與leaflet,目前看起來可一律用paste和08/24 09:03
46F→: as.formula將拼湊起來的字串轉換後送給繪圖函數08/24 09:05
47F→: 常用功能中能夠直接將names函數輸出結果放到繪圖中的,08/24 09:07
48F→: 目前我看到的只有aes_string以及facet_wrap。08/24 09:08
49F→: 另外補充說明:因為aes用的就是non-standard evaluation08/24 09:33
50F→: 所以我上面程式範例中使用eval(parse())的方法,到加入08/24 09:33
51F→: geom_point()看起來結果都是對的,但只要一facet就會出08/24 09:34
52F→: 問題,相關的討論之一我放在原文的連結中,主要還是因為08/24 09:36
53F→: ggplot2內部在繪圖時重新建的data frame會出錯,不過08/24 09:37
54F→: ggplot2並沒有針對這點寫警告訊息,所以需要自己小心。08/24 09:38
7F→: 建立matrix時是可以混雜數字和字串,但接下來運算可能會08/22 21:47
8F→: 產生奇怪的結果08/22 21:47
6F→: 感謝!再找時間來玩玩看~08/22 01:51
8F→: 這個也好棒!大感謝!08/22 10:37
9F→: 細讀之後發現我的狀況withProgress提供的幫助有限08/22 15:35
10F→: 因為我最花時間的地方是leaflet::addPolygons而非迴圈08/22 15:35
11F→: 我試過把地圖繪製的pipeline切開來並在中間放incProgess08/22 15:37
12F→: 但詭異的是進度條跑滿了,圖還是要再等一陣子才會出來08/22 15:38
18F→: 感謝!我也有查到leafletProxy,但我是主觀猜測應該幫助08/23 22:30
19F→: 不大,畢竟我每次更換輸入就是要重畫超過350個polygons08/23 22:31
20F→: 而前面只是做到addTiles而已 QQ08/23 22:32
23F→: 是前者喔 我就是在畫全臺鄉鎮 XD08/23 23:40