I would like to create a last column in the `result` database, which determined the `mode` between `df1`, `df2` and `df3` for each line.
result<-structure(list(n = c(7, 8, 9, 10, 11, 12, 13, 14, 15,
16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
32, 33, 34, 35), df1 = c(9L, 29L, 28L, 27L, 25L, 26L, 24L, 20L,
21L, 22L, 23L, 15L, 12L, 17L, 18L, 19L, 16L, 13L, 14L, 5L, 6L,
7L, 8L, 1L, 10L, 11L, 4L, 2L, 3L), df2 = c(3, 29, 28, 27, 26,
25, 24, 23, 22, 21, 20, 15, 12, 19, 18, 17, 16, 14, 13, 11, 10,
9, 8, 7, 6, 5, 4, 1, 2), df3 = c(1L, 29L, 28L, 27L, 25L, 26L,
24L, 20L, 21L, 22L, 23L, 15L, 12L, 17L, 18L, 19L, 16L, 13L, 14L,
5L, 6L, 7L, 8L, 9L, 10L, 11L, 4L, 2L, 3L)), row.names = c(NA,
-29L), class = "data.frame")
n df1 df2 df3
1 7 9 3 1
2 8 29 29 29
3 9 28 28 28
4 10 27 27 27
5 11 25 26 25
6 12 26 25 26
7 13 24 24 24
8 14 20 23 20
9 15 21 22 21
10 16 22 21 22
11 17 23 20 23
12 18 15 15 15
13 19 12 12 12
14 20 17 19 17
15 21 18 18 18
16 22 19 17 19
17 23 16 16 16
18 24 13 14 13
19 25 14 13 14
20 26 5 11 5
21 27 6 10 6
22 28 7 9 7
23 29 8 8 8
24 30 1 7 9
25 31 10 6 10
26 32 11 5 11
27 33 4 4 4
28 34 2 1 2
29 35 3 2 3