data <- data.frame(col1 = c(1, 2, 3),
col2 = c(NA, NA, 4),
col3 = c(5, NA, NA),
col4 = c(6, 7, 8))
data
na_move(data, c("col2", "col3", "col4"), direction = "right")
Run the code above in your browser using DataLab