Maybe this is what you are trying to do
library(stringr)
s <- c("70\"", "5 ft\"", "4\'11", "\"\"", "\".\"", "\"Six feet\"")
pattern <- "\\d" # This matches any digit
str_view_all(s, pattern)
Keep in mind that str_view_all() produces html output on the viewer pane
