Multiple escapes = confusion

tricky <- "double_quote <- \"\\\"\" # or '\"' single_quote <- '\\'' # or \"'\""
str_view(tricky)

## [1] │ double_quote <- "\"" # or '"' single_quote <- '\'' # or "'"