Haskell同时接受和丢弃

Question

我想知道如何实现：

取字符串的前n个字符然后++ （与它们连接）删除这些前n个并取下一个n依此类推（不用切词）。 我已经尝试过函数组合和$但我唯一得到的是错误。

编辑

我试图将给定列宽（n）左边的文本对齐，这就是为什么我尝试不剪切单词，但如果在数字n处有一个单词，只需在它之前取一些字符然后使用\\ n开始再次为下一行。 到目前为止我的主要问题是检查cut-words条件（我可以使用!!但是我应该在带有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执行此操作。