Anonymous user
Largest int from concatenated ints: Difference between revisions
→Compare repeated string method
Line 207:
main = print (map maxcat [[1,34,3,98,9,76,45,4], [54,546,548,60]] :: [Integer])
where
where sorted = sortBy (flip $ comparing $ take 10 . cycle)▼
sorted xs = let
maxLen = maximum $ map length xs
maxcat = read . concat . sorted . map show</lang>
{{out}}
| |||