string-manipulation code snippets in r

take the middle 4 characters of a string in one column and place them in another in r

write a code in r that add to every single backslash in string, another one in r