Мы можем использовать sub
, чтобы захватить шаблоны как группу, а затем выполнить перестановку обратной ссылки захваченных групп в замене
sub("^.(.{3}).(.)(.)", "\\3\\1\\2", df1$col)
#[1] "K1231" "Q2342" "W6788"
данных
df1 <- structure(list(col = c("F123/1K", "F234/2Q", "F678/8W")),
.Names = "col", class = "data.frame", row.names = c(NA, -3L))