PTT數位生活區 / R_Language

[問題] 判斷row的重複個數並做某個計算

看板R_Language作者 (khkh)時間9年前 (2016/07/01 00:55), 9年前編輯推噓2(2推 0噓 5→)
留言7則, 3人參與, 最新討論串1/1
[問題類型]: 程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來) [軟體熟悉度]: 請把以下不需要的部份刪除 新手(沒寫過程式，R 是我的第一次) [問題敘述]: 我有個眼動數據格式縮小後如下： time type 200 1 201 1 206 1 211 1 216 1 220 1 222 1 774 2 776 2 780 2 784 2 787 2 814 6 819 6 820 6 824 6 829 6 1153 11 1160 11 1160 11 1163 11 1. 我想要搜尋各type值，各持續幾秒， 例如：此範例，type=1時，經過20秒；type=2時，經過13秒...... 可以利用甚麼函數或寫法呢？ 2. 在得到上述持續時間後， 可以怎麼把type=1,2,6,11取出， 並乘上各自的持續時間？ 例如：type1=1*20、type2=2*13、type6=6*15... 這些type數字是會持續累積的， time也會持續增加，但每列增加的幅度不一樣。 謝謝回答！ [關鍵字]: row -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 115.43.120.177 ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1467305732.A.354.html ※ 編輯: bedroom0204 (115.43.120.177), 07/01/2016 00:56:21
推
07/01 01:30, , 1F
DT[,dif:=diff(range(time)),by="type"][,z:=dif*type]
07/01 01:30, 1F
謝謝您回答， 但結果出現error： Error in `[.tbl_df`(DT, , `:=`(dif, diff(range(time))), : unused argument (by = "type") 是跟我使用dplyr有關嗎？ ※ 編輯: bedroom0204 (115.43.120.177), 07/01/2016 01:41:08
→
07/01 01:49, , 2F
sorry I forgot to say I used library(data.table)
07/01 01:49, 2F
→
07/01 01:51, , 3F
and you can transfer by DT <- data.table(your_df)
07/01 01:51, 3F
推
07/01 09:52, , 4F
我用你提到的dplyr寫了一個可以用的，你可以試試看
07/01 09:52, 4F
→
07/01 09:52, , 5F
dat %>% group_by(type) %>% summarise(timediff=max(ti
07/01 09:52, 5F
→
07/01 09:53, , 6F
me)-min(time)) %>% mutate(answer=timediff*type)
07/01 09:53, 6F
謝謝您的回答，這是可行的，太厲害了... 但是我不太懂%>%是甚麼意思，怎麼會想到這樣用呀，礙於特殊符號，GOOGLE也查不到。 ※ 編輯: bedroom0204 (113.196.44.28), 07/05/2016 12:14:40
→
07/05 18:56, , 7F
可以找我文章的簽名檔，或是板上搜尋magrittr
07/05 18:56, 7F
‣ 更多 bedroom0204 的文章
文章代碼(AID): #1NTKy4DK (R_Language)
R_Language 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 bedroom0204 的文章
文章代碼(AID): #1NTKy4DK (R_Language)