我正在尝试在R中转置以下数据帧，以使Column2下的条目成为Column1中条目的级别：
Person Column1 Column2
001 Heart MI
002 Heart AFIB
003 Gastrointestinal Ulcer
004 Gastrointestinal Indigestion
新数据框如下所示：
Person Heart Gastrointestinal
001 MI
002 AFIB
003 Ulcer
004 Indigestion