将字符串拆分为确定数量的部分（Haskell）

Question

我正在尝试在Haskell中将字符串拆分成几个部分

实际上，我已经成功将String拆分为[[Integer]]但我想拥有一个[[[Integer]]] 。

这是我所拥有的：

parPaquets n [] = []
parPaquets n liste = (take n liste):parPaquets n (drop n liste)

我想要的是：parPaquets :: Int-> [Integer]-> [[[[Integer]]]

当我执行功能时，这就是我得到的：

parPaquets 3 [1..10]
[[1,2,3],[4,5,6],[7,8,9],[10]]

我想在parPaquets 3 [1..10]中得到什么：

[[[1,2,3]],[[4,5,6]],[[7,8,9]],[[10,0,0]]]

先感谢您 ：）

Answer 1

您可以在使用map (\\x -> [x])事后对其进行修复，也可以修改函数以将其放入列表中：

parPaquets n liste = [take n liste]:parPaquets n (drop n liste)

顺便说一下，您现有的函数也可以在split包中以几个不同的名称使用，例如， chunksOf 。 所以你也可以写

parPaquets n = map (\x -> [x]) . chunksOf n

Answer 2

我终于找到了问题的答案^^这是我的解决方案。 我敢肯定这不是真正的“美丽”代码，但是它可以正常工作，因此我暂时接受。

parPaquets :: Int -> [Integer] -> [[[Integer]]]
parPaquets n [] = []
parPaquets n liste = if ((toInteger(length(liste)) %% (toInteger n)) == (0 %% toInteger n)) then [take n liste]:parPaquets n (drop n liste) else parPaquets n (liste ++ [0])