在将数据集分组到R中的对应ID后如何取消分组

Question

我正在从分组的数据中建立一个新的数据集，但是当代码运行并无法在数据帧中进行任何更改的情况下给出相同的变量时，无法取消对数据的分组。

这是我拥有的数据集

s.no     Mno    drug3
   1    100173  9, 3, NA, NA
   2    100463  18, 18, 1, NA, NA, NA
   3    10061   18, 9, 2, 3, NA
   4    101793  0
   5    101876  0
   6    101909  0
   7    102685  0
   8    102707  0
   9    103171  18, 2, 1, NA, NA



A <- B %>% 
      group_by(Mno) %>% 
      summarise(drugs = paste(drug3, collapse=", ")) %>% 
      ungroup(drug3)

我需要这样的输出

s.no     Mno     drug3
   1    100173     9
   2    100173     3
   3    100173    NA
   4    100173    NA
   5    100463    18
   6    100463    18
   7    100463     1
   8    100463    NA
   9    100463    NA
  10    100463    NA
  11    10061     18
  12    10061      9
  13    10061      2
  14    10061      3
  15    10061     NA
  16    101793     0