testlist <- list(fpr = c(8.50677682469891e-241, 3.84022516636945e-182, -2.45526709807081e-119, -4.19494462747632e-92, 2.84882719248919e-242, -2.30432906839289e-13, -1.25718872023861e+304, 8.52676123363513e+35, -9.85865813270274e-265, 4.77553571361099e+141, 5.27289982706416e-55, 2.71843558198774e-42, -3.75422495560414e-191, -3.0197842319679e-38, -4.57859605570896e+47, -2.31420615719114e+295, 1.13496883158453e+232, -5.81560318442507e+54, 2.75855186357165e-285, 3.69586183455101e-53, -3.66132379702591e-288, 1.10008313492305e-174, 1.83284985150704e+298, 8.30392858724289e-190, 1.12436200084746e+184, -2.15396265430408e+22, 9.83705077084049e+252, Inf, 6.32841814676703e+229, -1.28471687273397e+51, 9.45936734425093e-302, NA, -1.33128782584266e-153, -1.29492115584672e+34, 7.002421376778e-50, -1.73194158867044e-118, 2.0240658369329e+254, 1.81762660942541e-72, -7.21861124808019e-243, Inf, 1.548729194283e-254, Inf, 1.15287505352285e-271, -1.23134542263458e-237, 1.03860664729922e+136, -2.92229243134808e+256, -Inf, 9.00801594269351e-148, 0), tpr = c(-1.60005247552844e+230, 1.10654431222861e+26, -6.59769890101929e-118, 1.6545022869092e-171, 3.85628280348675e-72, -3.58161307831772e-25, -5.55544717305703e-153, 1.22335256300243e-55, -1.86543643332402e+182, -1.7318879031059e+22, 8.89076369612961e+36, -2.55511284865421e-34, -3.02149005762505e-282, 1.18552509173647e-116, -6.66745337268812e-285, 6.06855830757196e-132, 1.06072846089952e+72, -8.24591830183789e-195, 3.38572094480494e+116, 1.50463872950946e-73, NA, -4.04006233312439e-167, -1.03961250013738e-141, 4.22975640856149e-301, 4.33129537016114e-13, -4.45127803853405e-97, 167952995831841216, -2.79899375280817e-216, NA, -1.09452883089415e-107, -5.24067384698009e+282, -2.21795629795199e+108, 1.13833294403768e-180, -6.37003430215366e+189, -1.80565301471608e+43, -1.70794895562709e-113, 4.59101559565534e-22, 2.6582277159538e-156, 1.08067668709173e-304, -8.27028094683393e+254, -4.74628064396102e-107, 3.15188111472359e-139, -1.1467829182297e-78, NA, -2.52862634722827e-236, 1.10002263976732e+152, 2.11466706298922e-193, -3.27721226764423e+236, -4.40356983783057e-70, -3.42378064930457e+301, -1.96897520232648e+106, -5.19929509752434e-104, -5.87652387359167e+94, 3.4695802260076e+266, -1.51100993438907e-108, -1.2110890510552e-54, -1.70317087049192e+161, 3.28711925039551e-190, -7.44068736138764e-57, -4.00419445059812e-99, 78.6305204035048, -6.55099674531775e+125, -1.27775115760558e+164, 3.28163269741455e-72, 2.07158730630429e-246, 3.67485427272804e-57, -8.63142026253433e-92, 0)) result <- do.call(fbroc:::add_roc_points,testlist) str(result)