访问列表条目并显示其值

Question

我有一个函数

(.#.) :: [a] -> Integer -> a                  -- 1-indexing with 'Integer'

xs .#. j = xs !! (fromIntegral $ j-1)

---

showIntegers :: [Integer] -> String

showIntegers r = let

      str = concat $ "List: " : [r (.#.) j | j <- [1..length r]]

如何将r (.#.) j 显示为Char/String 而不是整数？我尝试使用show，但它给了我一个错误。

这是我如何使用show的示例：

str = concat $ "List: " : [show $ r (.#.) j | j <- [1..length r]]

输入输出示例：

> showIntegers [1,2,3]
List: 1 2 3  

Answer 1

只需删除 (.#.) 周围的括号即可。

如果你有一个中缀运算符 !#$ ，在它之前和之后都有一些东西，例如x !#$ y，你不能使用括号。在其他情况下，添加括号，就像在类型声明中一样。

（这在技术上回答了这个问题，但 Guvante 的建议更好。）

Answer 2

您应该只使用Data.List.intercalate，或者更好地使用unwords。

import Data.List
showIntegers :: [Integer] -> String
showIntegers r = "List: " ++ intercalate " " $ map show r
--showIntegers r = "List: " ++ unwords $ map show r

编辑：在任何一种情况下，您都应该避免使用!!，尤其是在枚举原始列表时。

首先我要去掉.#.，它只会让你混淆使用不同的编号系统，最好撕掉那个创可贴。

接下来意识到[show $ r !! j <- 0 .. length r - 1] 与map show r 相同（后者是标准的）。

现在你有：concat $ "List: " : (map show r) 创建 List: 123 因为我们丢失了空格。

我们可以重现空格，但使用intercalate 和concat 有什么区别？老实说，不使用intercalate 的最佳解决方案是复制intercalate（其源代码可在Hackage 上找到）。