string - Haskell 同时获取和删除

Question

我想知道如何实现:

获取字符串的前 n 个字符，然后 ++(将它们连接起来)删除前 n 个字符并获取下一个 n 等等(不剪切单词)。我尝试过函数组合和 $ 但我得到的唯一结果是错误。

编辑

我试图将文本向左对齐给定的列宽(n)，这就是为什么我尝试不剪切单词，但是如果数字 n 处有一个单词，只需在它前面取一些字符，然后使用\n 重新开始下一行。到目前为止，我的主要问题是检查剪切词条件(我可以使用 !! 但我应该在带有 map(-1) 的守卫中使用它还是其他方式)并实现递归，因为作为我得到的基地

take n s ++ "\n" ++ take n (drop n s)

还有 n 小于最长单词的情况:

leftAlign n str = if n < ((maximum . map length . words) str) then "" else leftAlign n str

Answer 1

Data.List.Split.chunksOf这样做。