r - 将当前数据框重塑为另一个数据框并创建新列（连接）

Question

我有附加的数据框（here），我需要将其重塑为如下所示的格式

基本上，我想将每个比较每个 traet 组（LA、RA、BiA）添加到 NP 治疗组，并创建一个在 Studlab 和治疗臂之间连接的列。

我试图用我之前回答的问题（这里）来解决这个问题，但我做不到。任何建议将不胜感激。

标签： rreshape

Answer 1

如果没有数据样本并且不知道 2Total 和 Group2.event 的确切来源，很难为您提供帮助。但基础应该是这样的：

df %>% 
 gather(treat2:treat4, key = "key", value = "tmp_compare_groupe") %>% 
 mutate(Compare_Groups = paste0("NP_", tmp_compare_groupe), 
        2nd.Total = case_when(tmp_compare_groupe == "LA" ~ LA,
                              tmp_compare_groupe == "RA" ~ RA,
                              tmp_compare_groupe == "BIA" ~ BIA,
                               ))

我不知道 Group2.event 来自哪里。计算完所有列后，您必须选择所需的列。