各要素がわかっているデータをCross Tableで表したい。

Question

RでCross Tableを作成し、Fisher Exact Testをしたいと思っています。
すでに、エクセルで各要素の数字は出来上がっており、csvで保存しています。
例えば
year rank Answer1 Answer2
2019 1 8 1
2019 2 10 4
2019 3 0 6
2019 4 11 3
2020 1 4 8
2020 2 5 4
2020 3 11 2
2020 4 9 7
2021 1 2 4
2021 2 3 2
2021 3 7 7
2021 4 9 5
として
Cross TableとしてRで
Answer1については
-- 1 2 3 4
2019 8 10 0 11
2020 4 5 11 9
2021 2 3 7 9
のように出力したいと思っています。
このような場合はどのようにしたら良いのでしょうか？
大変初歩的な質問になりますが、よろしくお願いいたします。

Answer 1

library(tidyverse)のpivot_wider()を使うのが常道でしょう。

参照:tidyr入門

Comments

[Kircheis]

KojiDoi様
御返事が遅くなり、申し訳ありません。
今回、この読み込んだデータをdfというオブジェクトにして
単純に
df %>% pivot_wider (name_from = Rank, values_from = Answer1)
としたら、Answer2の答えもついてきたので、
df1 <- df1[,-4]
としてAnswer2の列を消してから、行いました。
そしたら、できました。
ありがとうございました。
今後ともよろしくお願いいたします。