Merging/Die Kombination eine Liste von ganzen Zahlen mit Char [Haskell]

Question

ich einen Hinweis mag, wie Sie diese Funktion anwenden:

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

auf einer Liste von ganzen Zahlen, z .; [1234567822,3245336792, ...], also würde ich eine Ausgabe wie ["123456/7822", "324533/6792", ...] bekommen.

Der Punkt ist, ein "/" nach der 6. Ziffer in jeder Nummer einer Liste von ganzen Zahlen hinzuzufügen, z. [1234567822,3245336792, ...]. Vielleicht gibt es einen besseren Weg als ich.

Answer 1

intToDigit erwartet eine einzelne Ziffer, so wird es einen Fehler bei der Eingabe wie 1234567822.

Um ein Int (oder Integer) zu umwandeln in eine Liste von Zeichen zu erhöhen, Sie show, und dann teilen Sie die resultierende Zeichenfolge verwenden können, nach sechs Ziffern

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

dti = map format