我有描述父子关系的数据： df <- tibble::tribble( ~Child, ~Parent, "Fruit", "Food", "Vegetable", "Food", "Apple"……