これを理解しようとしているR

Question

アムに日付に基づいて一意のIDを作成します。..

私は、このデータセットを持っている：

：

id  date 
1 1 2016-01-01 
2 1 2016-01-01 
3 1 2016-01-02 
4 2 2016-01-01 
5 2 2016-01-03 
6 2 2016-01-04 
7 3 2016-01-01 
8 3 2016-01-05 
9 3 2016-01-05 

ので、私はで、このためにdplyr使用しようとしていますが

transformed <- data %>% group_by(id) %>% transform(., flag=match(date, unique(date))) 

と私はこれだ：

id  date flag 
1 1 2016-01-01 1 
2 1 2016-01-01 1 
3 1 2016-01-02 2 
4 2 2016-01-01 1 
5 2 2016-01-03 3 
6 2 2016-01-04 4 
7 3 2016-01-01 1 
8 3 2016-01-05 5 
9 3 2016-01-05 5 

が、私は初見から、このために

id  date flag 
1 1 2016-01-01 1 
2 1 2016-01-01 1 
3 1 2016-01-02 2 
4 2 2016-01-01 1 
5 2 2016-01-03 2 
6 2 2016-01-04 3 
7 3 2016-01-01 1 
8 3 2016-01-05 2 
9 3 2016-01-05 2 

を目指し、transformは、配管のコマンドを認識していることを思えません。 IDは日付シーケンスに従います。

dplyrを使用してこれを達成するにはどうすればよいですか？ as.characterまたはas.Dateの日付の場合、動作しません。

Answer 1

あなたはこのために、次を使用することができます。

library(dplyr) 
df %>% 
group_by(id) %>% 
#convert the date into a factor and then into numeric 
#which will give you what you need 
mutate(flag = as.numeric(as.factor(date))) 

出力：

Source: local data frame [9 x 3] 
Groups: id [3] 

    id  date flag 
    <int>  <chr> <dbl> 
1  1 2016-01-01  1 
2  1 2016-01-01  1 
3  1 2016-01-02  2 
4  2 2016-01-01  1 
5  2 2016-01-03  2 
6  2 2016-01-04  3 
7  3 2016-01-01  1 
8  3 2016-01-05  2 
9  3 2016-01-05  2 

Answer 2

をあなたは `transform`を使用しないのはなぜ私たちはdata.table

library(data.table) 
setDT(df1)[, flag := match(date, unique(date)), by = id]