testlist <- list(parent = c(-568676763L, -250049000L, 1237429200L, -645489399L, 1298265599L, 889924430L, -907775620L, -152022060L, 167852540L, 432477283L, -1983958174L, 1188064147L, 828412518L, 1807594548L, -1574588264L, 352546080L, 77995038L, 1848672759L, -273393355L, -2067478347L, 609885071L, 416334778L, -176991733L, 2009017211L, 1715968468L, 1998244710L, -836461486L, -396097780L, -1088185385L, -211906072L, -773590200L, -1558264823L, 1700650460L, 2024293190L, -857761356L, 1134608386L, -1017390666L, -1184194678L, 1318245361L, -1315440106L, -187174036L, 2134291275L, 357367640L, -323003472L, 439641811L, -1627038227L, -1741627831L, -942121028L, -1353570258L, -1998882403L, 662238740L, 928105553L, -2060835804L, 813765064L, -1292955271L, -948947594L, -1017207733L, 958261601L, -1780517428L, 809049525L, 1665260179L, -1007985803L, -613618014L, -584836704L, -2101482565L, -606856080L, -1282327069L, -900032210L, -1670135457L, 1579013177L, -1983718298L, -420149656L, -1292753779L, -968819078L, -767861348L, -1778988495L, 1770819784L, -1453063886L, 668834061L, -761301371L, -1852173736L, -636431700L, 1261390305L, 638784143L, -1616685240L, 123304750L, 907295753L, -1280143803L, 1285594406L, -1318071300L, -1642275388L, 804279503L, -1817503846L, 76728635L, -1509604262L, -1210933501L)) result <- do.call(tidygraph:::get_paths,testlist) str(result)