如何从由字符串和整数三元组组成的列表中找到整数值的平均值？

Question

我需要一些有关家庭作业的帮助。问题是写一个非递归的averageAge函数，该函数以人员列表和字符串“ employed”或“ unemployed”作为参数，并返回具有给定就业状态的列表中的平均年龄。]

我已经编写了以下代码，但是该代码仅从列表中提取匹配的值。 sumList用于添加整数值的和：

(define sumList
  (lambda(lst)
    (if (null? lst)
        0
        (+ (car lst)(sumList (cdr lst)))
        )))

(define (averageAge lst s)
  (filter (lambda(x) (equal? (caddr x) s)) lst))

(define lst '( (joe  21  "employed")  ( ann 19 "unemployed")  (sue 18 "employed" )  ))
代码从列表中提取以下值

 >>(averageAge lst "employed")
 >>'((joe 21 "employed") (sue 18 "employed"))
我不知道如何从这里获取以下输出。任何帮助，将不胜感激。

>>(averageAge  lst  “employed”) 
>>19.5

我需要一些有关家庭作业的帮助。问题是写一个非递归的averageAge函数，该函数将一个人列表和一个字符串“ employed”或“ unemployed”作为参数并返回...

Answer 1

您可以通过[sumList过程与其他高阶过程一起组成