I have data something like this:
df <- tribble( ~A, ~B, \'a\', \'304 49494 3033 23\', \'b\', \'958 49494 5859\', \'c\', \'304 4535 59\', )