How to list all direct and indirect linked values

let
    dataTable = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45WclTSUXJSitWJBpI6Ss5gljOQ5QJnuYJZEUBWJJgVCWRFKcXGAgA=", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [From = _t, To = _t]),
    fx = (tbl, s) => 
        let 
            a = List.Combine(List.Transform(s, (v) => Table.SelectRows(tbl, each [From] = v)[To]))
        in 
            if List.Count(a) = 0 then {} else (a & Fx(tbl, a)), 
    result = Table.AddColumn(
        Table.SelectRows(dataTable, each Table.RowCount(Table.SelectRows(dataTable, (r) => r[To] = [From])) = 0)[[From]], 
        "To", 
        each "{" & Text.Combine(fx(dataTable, {[From]}), ",") & "}"
    )
in
    result