how to replace the value in rows and mover the row to certain place

Question

I have a data.frame that looks like this:

Sample data can be build using codes:

df <-structure(list(Name = c("Name", "A1"