傾向スコアが一致した 2 つのグループ (EG と CG) があります。最初のデータ フレーム df_1 は、対応する参加者のペアを示しています。
df_1 <- read.table(text="
ID_EG ID_CG
800289 823516
800674 820870
811434 800796
838623 800958
801208 836587
801299 855510", header=TRUE)
さらに、EG からの参加者のみを含むデータ フレーム (長い形式、つまり、すべての行が測定ポイント) があります。このデータ フレームには、時点 1 での年齢を示す変数と、参加者を選択した年齢グループを示す変数も含まれています。
df_2 <- read.table(text="
ID age_T1 age_group
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800674 40 middle
800674 40 middle
800674 40 middle
800674 40 middle
811434 85 old
811434 85 old
811434 85 old
811434 85 old
811434 85 old
811434 85 old
838623 36 middle
838623 36 middle
838623 36 middle
838623 36 middle
838623 36 middle
801208 21 young
801208 21 young
801299 77 old
801299 77 old
801299 77 old
801299 77 old
801299 77 old
801299 77 old
801299 77 old", header=TRUE)
最後に、CG からの参加者のみを含むデータ フレームがあります (これも長い形式です)。このデータ フレームには、年齢グループ変数は含まれていません。
df_3 <- read.table(text="
ID age_T1
823516 16
823516 16
823516 16
823516 16
823516 16
823516 16
823516 16
823516 16
823516 16
823516 16
855510 77
855510 77
855510 77
855510 77
855510 77
855510 77
855510 77
820870 39
820870 39
820870 39
820870 39
800796 88
800796 88
800796 88
800796 88
800796 88
800796 88
800958 37
800958 37
800958 37
800958 37
800958 37
836587 18
836587 18", header=TRUE)
EG と CG の両方の参加者 (rbind df_2 と df_3 など) を含むデータ フレームが必要です。しかし、EG からの対応する一致した人物が持つ値に対応する CG 参加者に age_group の値を挿入したいと思います。たとえば、ID 836587 (CG) を持つ人物は、age_group で 801208 (EG) と同じ値を受け取る必要があります。これは、これら 2 人の参加者が (df_1 に従って) 一致するペアであるためです。
最終的なデータセットは次のようになります。
df_final <- read.table(text="
ID age_T1 age_group
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800289 18 young
800674 40 middle
800674 40 middle
800674 40 middle
800674 40 middle
811434 85 old
811434 85 old
811434 85 old
811434 85 old
811434 85 old
811434 85 old
838623 36 middle
838623 36 middle
838623 36 middle
838623 36 middle
838623 36 middle
801208 21 young
801208 21 young
801299 77 old
801299 77 old
801299 77 old
801299 77 old
801299 77 old
801299 77 old
801299 77 old
823516 16 young
823516 16 young
823516 16 young
823516 16 young
823516 16 young
823516 16 young
823516 16 young
823516 16 young
823516 16 young
823516 16 young
855510 77 old
855510 77 old
855510 77 old
855510 77 old
855510 77 old
855510 77 old
855510 77 old
820870 39 middle
820870 39 middle
820870 39 middle
820870 39 middle
800796 88 old
800796 88 old
800796 88 old
800796 88 old
800796 88 old
800796 88 old
800958 37 middle
800958 37 middle
800958 37 middle
800958 37 middle
800958 37 middle
836587 18 young
836587 18 young", header=TRUE)
これを行う方法はありますか？どんな助けやアドバイスも大歓迎です！