我有2个数据框,它们在一种方式上基本不同。一个是来自同一主df,该主df在某个时间点被拆分,将实验中的值分成两半。另一个只是总数。
A
# A tibble: 6 x 10
# Groups: Subject [3]
Subject Half L1s L2s Cs R2s R1s Left Right TotalNPs
<chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 KM10 First 1 5 1 2 4 6 6 13
2 KM10 Second 2 3 0 1 1 5 2 7
3 KM11 First 3 7 9 10 8 10 18 37
4 KM11 Second 7 6 9 9 7 13 16 38
5 KM12 First 0 0 1 0 2 0 2 3
6 KM12 Second 1 2 0 0 2 3 2 5
B
# A tibble: 6 x 6
Subject L1s L2s Cs R2s R1s
<chr> <dbl> <dbl> <dbl> <dbl> <dbl>
1 KM10 3 8 1 3 5
2 KM11 10 13 18 19 15
3 KM12 1 2 1 0 4
4 KM3 48 13 63 23 39
5 KM4 15 8 29 38 56
6 KM5 10 2 4 7 1
当我在上面运行此代码时:
B %>%
mutate(Group = ifelse(grepl("0$|2$|4$|6$|8$",td$Subject), "Ctrl", "Expt"))
R分配组列没有问题,输出:
# A tibble: 6 x 7
Subject L1s L2s Cs R2s R1s Group
<chr> <dbl> <dbl> <dbl> <dbl> <dbl> <chr>
1 KM10 3 8 1 3 5 Ctrl
2 KM11 10 13 18 19 15 Expt
3 KM12 1 2 1 0 4 Ctrl
4 KM3 48 13 63 23 39 Expt
5 KM4 15 8 29 38 56 Ctrl
6 KM5 10 2 4 7 1 Expt
但是当我为DF A运行它时,它给了我这个错误:
Error in mutate_impl(.data, dots) :
Column `Group` must be length 2 (the group size) or one, not 20
这与df A中的“主题”每行出现两次有关,但是我不知道该如何克服。我检查了我发现的所有提到此错误的线程,也没有一个解决我的问题。