Replace text between two special characters

Question

I have a character vector as:

x<- \"\\t\\t\"

and

 y<- \"TOT_A01\"

Answer 1

Try

 sub('(?<=").*(?=")', y, x, perl=TRUE)
 #[1] "\t\t"