Here is the Dataset for RStudio:
Original:
structure(list(Cust = c("a", "a", "a", "a", "b", "b", "b", "b",
"b", "c", "c", "c", "c", "c", "d", "e", "e", "e", "f", "f", "f",
"f", "f", "f"), Year = c(2020, 2020, 2020, 2021, 2019, 2020,
2020, 2020, 2020, 2020, 2021, 2021, 2021, 2021, 2021, 2019, 2019,
2021, 2020, 2020, 2020, 2021, 2021, 2021), Month = c(2, 4, 7,
8, 1, 1, 2, 8, 11, 12, 1, 4, 5, 7, 12, 11, 12, 10, 7, 8, 10,
1, 2, 7), Value = c(17.1132392563811, 82.4624060030711, 7.36487637522714,
4.37340608492061, 52.7114539604453, 17.502410936385, 60.6250668385648,
13.7213856071386, 49.7832135247854, 74.5374119415543, 86.1627274135591,
34.3547763153967, 0.496440083511063, 73.9036004776085, 76.5231975529228,
16.930364987526, 84.0237708007239, 86.5041586423134, 53.5592603976753,
3.6294916413718, 7.3047081585912, 65.5391278724964, 50.3107515153293,
97.3149369209477)), row.names = c(NA, -24L), class = c("tbl_df",
"tbl", "data.frame"))
Goal:
structure(list(Year = c(2019, 2019, 2019, 2019, 2019, 2019, 2019,
2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019,
2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019,
2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019,
2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019,
2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019,
2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2019, 2020,
2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020,
2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020,
2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020,
2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020,
2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020,
2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020, 2020,
2020, 2020, 2020, 2020, 2020, 2021, 2021, 2021, 2021, 2021, 2021,
2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021,
2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021,
2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021,
2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021,
2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021,
2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021, 2021
), Month = c(1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3,
3, 3, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 7,
7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 10, 10, 10,
10, 10, 10, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 1,
1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4,
4, 4, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8,
8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 11,
11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 1, 1, 1, 1, 1, 1,
2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 5, 5, 5,
5, 5, 5, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8,
9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11,
11, 12, 12, 12, 12, 12, 12), Cust = c("a", "b", "c", "d", "e",
"f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f",
"a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a",
"b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b",
"c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c",
"d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d",
"e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e",
"f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f",
"a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a",
"b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b",
"c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c",
"d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d",
"e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e",
"f", "a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f",
"a", "b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a",
"b", "c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b",
"c", "d", "e", "f", "a", "b", "c", "d", "e", "f", "a", "b", "c",
"d", "e", "f"), Values = c(NA, 52.7114539604453, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 16.930364987526,
NA, NA, NA, NA, NA, 84.0237708007239, NA, NA, 17.502410936385,
NA, NA, NA, NA, 17.1132392563811, 60.6250668385648, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, 82.4624060030711, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 7.36487637522714,
NA, NA, NA, NA, 53.5592603976753, NA, 13.7213856071386, NA, NA,
NA, 3.6294916413718, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, 7.3047081585912, NA, 49.7832135247854, NA, NA, NA, NA, NA,
NA, 74.5374119415543, NA, NA, NA, NA, NA, 86.1627274135591, NA,
NA, 65.5391278724964, NA, NA, NA, NA, NA, 50.3107515153293, NA,
NA, NA, NA, NA, NA, NA, NA, 34.3547763153967, NA, NA, NA, NA,
NA, 0.496440083511063, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, 73.9036004776085, NA, NA, 97.3149369209477, 4.37340608492061,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 86.5041586423134,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 76.5231975529228, NA,
NA)), row.names = c(NA, -216L), class = c("tbl_df", "tbl", "data.frame"
))