Question

I’d like a hint on how to apply this function:

dti xs = (map intToDigit (take 6 (map digitToInt xs))++['/']++map intToDigit(drop 6 (map digitToInt xs)))

on a list of Integers, e.g.; [1234567822,3245336792,…], so I’d get an output like [“123456/7822″,”324533/6792”,…].

The point is to add a “/” after the 6th digit in each number of a list of integers, e.g.; [1234567822,3245336792,…]. Maybe there’s a better way to do it than mine.

Answer 1

intToDigit expects a single digit, so it will raise an error on input like 1234567822.

To convert an Int (or Integer) into a list of characters, you can use show, and then split the resulting string after six digits

format n = first ++ '/':second
  where
    s = show n
    (first,second) = splitAt 6 s

dti = map format