a function to find the digital root of a string of numbers