后裔统计问题分享与解答（递归函数），大家有更好的办法吗？

shaowu459

micch 发表于 2024-7-19 13:57
新函数很强大，新函数也能递归，不过我对递归不熟悉，所以不知道递归怎么写，只能直接枚举强算

递归的公式：=LET(d,A$2:A$73,f,LAMBDA(f,n,IF(OR(d=n),COUNTIFS(A:A,n,B:B,{"儿子","女儿"})+REDUCE(0,FILTER(C$2:C$73,d=n),LAMBDA(x,y,x+f(f,y))),{0,0})),f(f,E2))
抠掉几个字符后的公式：=LET(d,A$1:A$73,f,LAMBDA(f,n,IF(OR(d=n),COUNTIFS(A:A,n,B:B,{"儿子","女儿"})+REDUCE(,IF(d=n,C$1:C$73),LAMBDA(x,y,x+f(f,y))),{0,0})),f(f,E2))

zpy2

SQL 递归查询:
//select * from 统计后裔 limit 20;
with recursive under_alice(old_rowid,统计以下人员的数量,下级,关系) as (
select Sheet1.rowid,统计以下人员的数量,子,关系 from Sheet1 left join 统计后裔 on 统计以下人员的数量 like 父 union all select  old_rowid,统计以下人员的数量,x.子,x.关系 from 统计后裔 x join under_alice on x.父=under_alice.下级

)
select old_rowid, 统计以下人员的数量,sum(关系="儿子") 男性,sum(关系="女儿") 女性 from under_alice group by 统计以下人员的数量 order by old_rowid;

EHGOOD

练习，字典+递归。

cnmlgb9998

简小白 发表于 2024-7-19 14:08
借助AI解释一下函数

AI  都这么厉害了？！！！！！！！！！！！

sdytsxd991122

学习了

sdytsxd991122

学习wps

songshihai

#在这里快速回复#Function 后裔(姓名, 性别)     s = Split(Trim(后裔名(姓名)), " ")     For Each s1 In s         If IIf(Split(s1, ",")(1) = "儿子", "男性", "女性") = 性别 Then n = n + 1     Next s1     后裔 = n End Function Function 后裔名(姓名)     arr = Range(Cells(2, 1), Cells(Rows.Count, 3).End(xlUp))     For i = 1 To UBound(arr)         If arr(i, 1) = 姓名 Then s = s & " " & arr(i, 3) & "," & arr(i, 2) & 后裔名(arr(i, 3))     Next i     后裔名 = s End Function

songshihai

Function 后裔(姓名, 性别)
    s = Split(Trim(后裔名(姓名)), " ")
    For Each s1 In s
        If IIf(Split(s1, ",")(1) = "儿子", "男性", "女性") = 性别 Then n = n + 1
    Next s1
    后裔 = n
End Function
Function 后裔名(姓名)
    arr = Range(Cells(2, 1), Cells(Rows.Count, 3).End(xlUp))
    For i = 1 To UBound(arr)
        If arr(i, 1) = 姓名 Then s = s & " " & arr(i, 3) & "," & arr(i, 2) & 后裔名(arr(i, 3))
    Next i
    后裔名 = s
End Function