testlist <- list(x = c(-2087591313L, -448037017L, -141705857L, 260029442L, -562327802L, -132493557L, -20311665L, 2039853820L, 647260939L, -538283050L, 2016433543L, -1357739379L, -1927703674L, 870551857L, -1381842906L, 947003998L, 109931237L, NA, 219248572L, 587286960L, 450639437L, -1077445012L, 1782485666L, -1330380618L, 1097505721L, 1196861524L, 1730089098L, 542718778L, 913410037L, 956654243L, 1140082163L, -1455052310L, -1337678857L, -1689498622L, 1801227660L, -1228355860L, 961470834L, NA, 945457889L, -1607152816L, 2020558611L, -1147988442L, -257707354L, 1803129508L, -948758758L, -1221807633L, -2026057689L, 1889236968L, 180288709L, 1376971842L, -1247877088L, 393921758L, -304350812L, 145396623L, -429672874L, -13811959L, -348401859L, 1304133378L, 1499931249L, -504999985L, -1035439158L, -217622055L, 1779380329L, 1013936935L, -1438489097L, -35325610L, 1276888877L, 18349251L, 1601211730L, 2011573473L, -178500815L, -876717707L, 12479741L, -1570417682L, -2145706879L, 840451473L, -1999444737L, -1190075986L, 1814880311L, -365318934L, -149362791L, 2100988157L, 1436843655L, -1128064699L), y = c(-747887473L, 809358534L, 974722375L, 1041416336L, -261043450L, -856615872L, -38063804L, -367009347L, -1962586949L, 1109492092L, 982958968L, -1451030375L, -204169281L, -978059326L, 1848641368L, 1340610010L, -312306129L, -2095600707L, -1368509097L, -247533340L, 311403479L, 1134729649L, -761263583L, -2011169931L, -2121161724L, -1454390953L, -1107841362L, 899584583L, 758455920L, -675863895L, 1479330528L, 1271289549L, 1476055296L, 1251170055L, -1979337025L, -1555560751L, 2116305237L, 1194323612L, -1882647333L, -1888835353L, NA, 205502102L, 1147950568L, -1269057230L, 2147125339L, 1585942253L, 1352845536L, 208717681L, -357687306L, -304771790L, 1105337078L, 1054025917L, -844097493L, 933697928L, 1239509078L, 1378862908L, -572116277L, -1128268291L, -1575488544L, -367223369L, -860429564L, 1576832166L, -571147217L, 600009472L, -1432433818L, 1573413887L, -547889207L, 1937604927L, 862208912L, 1624192573L, -1020039706L, -153557088L, 1991378644L, 2070598490L, -1045224396L, 816149347L, 163050345L, -2044090806L, 1544761427L, -333974686L, -889571771L, 1678417701L, -1111270931L, 1758220401L, -2092705270L, 1820415177L, -1803281280L, -1676680346L )) result <- do.call(phylobase:::testEqInt,testlist) str(result)