改变元组的形式

Question

我有一个包含元组的列表。我想将收到的列表的形式更改为不同的形式。下面的例子：

我正在接受 [[(String, Int, String, Int, String, Double)]] 或 [[(a,b,c,d,e,f)]]

我想把它变成如下形式的一个元组列表：

[(String,Double,Int)] 特别是[(e, ((d*f)/(d)), d)]

我正在尝试计算 GPA，其中列表包含一个元组列表，其中包含一个人正在学习的所有课程。 e 是人名，d 是学分数，f 是成绩点。每个元组中的名称都相同，但成绩和学分不同。

我不明白如何遍历列表列表中的所有元组并获取每个元组的d 和f，这是我计算 GPA 所需的值。

如果有任何帮助可以推动我朝着正确的方向前进，我将不胜感激。

谢谢

---

更新

我现在有一个元组列表。看起来像这样：

    [("Erikson,Ann",2.0,3),("Erikson,Ann",3.33,3),("Lewis,Buck",2.66,1), 
    ("Lewis,Buck",2.0,3),("Smith,John",0.0,1),("Smith,John",1.66,3), 
    ("Smith,John",1.33,3),("Torvell,Sarah",4.0,3)]

我需要为每个人创建一个元组。元组应具有以下形式： （姓名、计算的 GPA、总学分）

计算出的 gpa 是每个元组的第二个元素乘以每个元组中的第三个元素加上该操作与所有其他同名元组的乘积。然后将该数字除以学分的总和（第三个元素）。元组中所有同名的第三个元素的总和就是第三个元素。混乱和努力工作。最后，我希望每个人都有一个元组。

我正在尝试这个：

    type MyType2 = (String, Double, Int)
    groupNameTuple :: MyType2 -> MyType2 -> Bool
    groupNameTuple (a,_,_) (b,_,_) = a==b


    calcGPA :: MyType2 -> MyType2 -> MyType2
    calcGPA (a,b,c) (d,e,f) = (a, ((b*c)+(e*f))/(b+e), (b+e))

当我尝试在底部进行此计算时，它说中间元素不是双精度数。除了那个错误之外，这是在正确的方向吗？

谢谢

Answer 1

首先定义一个函数来计算 GPA，例如： gpa (a,b,c,d,e,f) = (e,d*f/d,d)

您需要两次映射列表，第一次用于外部列表，第二次用于内部列表，例如： fmap (fmap gpa) listOfLists

或使用<$> 运算符： ((<$>) gpa) <$> listOfLists

另一个名为protolude 的前奏也定义了一个执行此操作的运算符，看起来非常直观： gpa <<$>> listOfLists

Answer 2

根据您的评论，不确定这是否正是您想要的，但它可能会有所帮助：

convertTupleList :: [[(String, Int, String, Int, String, Double)]] -> [(String,Double,Int)]
convertTupleList ts = map morphTuple $ concat ts

morphTuple :: (String, Int, String, Int, String, Double) -> (String, Double, Int)
morphTuple (_,_,_,d,e,f) = (e, (d'*f)/d', d)
  where
    d' = fromIntegral d

convertTupleList first concats 元组列表列表，基本上是[[a]]->[a]。然后在concated 列表上使用maps morphTuple 函数。所以每个元素都从元组(String,Int,String,Int,String,Double) 变形为(String,Double,Int)。 morphTuple 函数使用fromIntegral 将Int 转换为Double，然后相应地进行乘除。当然还有更简洁的解决方案，例如 convertTupleList 尖叫无点风格，但我将把它作为优化和纠正任何规范错误的练习。我还建议剖析 GHCi 中的 concat 和 map 函数。更多参考资料和有用的列表功能：Haskell Report Folds

PS：请添加编码尝试并使用编辑按钮更新原始问题。