作者fifish89 (OMG)
看板R_Language
標題[問題] 長度不同判斷天數
時間Sat Aug 8 12:03:36 2015
[問題類型]:
程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)
[軟體熟悉度]:
使用者(已經有用R 做過不少作品)
[問題敘述]:
a,b 都是天數
想知道以a的長度為基礎,是否有找到一個b是落在a的前2天
每個人都有不同的a和b, 且a,b長度每個人也都不同
以一個人為例：
set.seed(200)
a <- sort(sample(1:30,6))
a
# 17 18 19 21 29 30
b <- sort(sample(1:80,15))
b
# 8 10 12 19 22 28 31 35 40 41 44 48 49 57 63
比如說:
a[1] = 17,但在b中找不到落在a前兩天者(沒有15或16) ---> d[1] = 0
a[2] = 18,但在b中找不到落在a前兩天者(沒有16或17) ---> d[2] = 0
a[3] = 19,但在b中找不到落在a前兩天者(沒有17或18) ---> d[3] = 0
a[4] = 21,但在b中有找到落在a前兩天者( 有19或20) ---> d[4] = 1
a[5] = 29,但在b中有找到落在a前兩天者( 有27或28) ---> d[5] = 1
a[6] = 30,但在b中有找到落在a前兩天者( 有28或29) ---> d[6] = 1
希望輸出 :
ID a d
1 17 0
1 18 0
1 19 0
1 21 1
1 29 1
1 30 1
2 . .
2 . .
想了很久不知道要怎麼寫@@
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 219.85.167.10
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1439006618.A.9B3.html
1F：→ celestialgod: d = a %in% c(b+1,b+2) 08/08 12:23
2F：→ celestialgod: 應該用group_by(ID)配上面用mutate就可用成你要的 08/08 12:26