合并/组合整数列表与Char [Haskell]

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, eg; [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, eg; [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