Merge rows

grid_row_merge(grid, columns)

library(toastui)

datagrid(mtcars[order(mtcars$cyl), 1:5]) %>%
  grid_row_merge(columns = "cyl")

  
mpg
cyl
disp
hp
drat
22.8
4
108
93
3.85
24.4
146.7
62
3.69
22.8
140.8
95
3.92
32.4
78.7
66
4.08
30.4
75.7
52
4.93
33.9
71.1
65
4.22
21.5
120.1
97
3.7
27.3
79
66
4.08
26
120.3
91
4.43
30.4
95.1
113
3.77



datagrid(mtcars[, 1:8]) %>%
  grid_row_merge(columns = "cyl") %>%
  grid_row_merge(columns = "vs")

  
mpg
cyl
disp
hp
drat
wt
qsec
vs
21
6
160
110
3.9
2.62
16.46
0
21
160
110
3.9
2.875
17.02
22.8
4
108
93
3.85
2.32
18.61
1
21.4
6
258
110
3.08
3.215
19.44
18.7
8
360
175
3.15
3.44
17.02
0
18.1
6
225
105
2.76
3.46
20.22
1
14.3
8
360
245
3.21
3.57
15.84
0
24.4
4
146.7
62
3.69
3.19
20
1
22.8
140.8
95
3.92
3.15
22.9
19.2
6
167.6
123
3.92
3.44
18.3