testlist <- list(bg = c(5.05107442166784e+120, -5.78936242882356e+93, 6.89413922929099e+47, 2.44539086808659e-86, 1.0935372876868e-207, 1.38724699981922e-134, 1.55249224640844e+275, 2.49737557651846e+56, -2.19682221648575e+60, -4.87441133829026e-213, -1.99602424960686e-140, -4.69938528249398e-20, -1.11592839355046e+170, 1.8280291119252e+153, 3.12841809088519e+187, -2.39682777361913e-245, -4.72787498060106e-172, -3.60393983438945e+41, 3.78788841954875e-243, 1.83256593058178e+116, -4.42593797887469e+160, 3.21759483180466e+40, 3.48325048456177e-264, 1.12041057083754e-122, -5.49906372405249e+23, -5.57063900296426e-183, 6.77668219319993e+126, 2.64895456424581e-139, 1.31811147361447e+39, 1.87979699345068e-221, -6.70939165604135e-151, 5.48689750973174e+38, 1.31455194046167e-288, 7.17786009835887e-77, 3.11404119754965e+159, 2.25842022200925e+27, -4.16598764013351e+69, 8.52222037375526e-255, -3.63793901562505e+124, 1.26698551129027e+289, -2.21209417801963e+287, -2.94685897421173e+143, -3.85941897072093e+192, -3.19722805759127e+172, -1.0034474420466e+304, 4.02346764675613e-135, 1.07531427679841e+242, -9.29177057923572e+274, -1.70270940562957e-87, -1.01234684237682e-219, 3.43630400606225e-270, 510923.287272302, 3.51941825928212e+166, 1.22041141339004e+170, -1.23725439378061e+278, -4.01622413535557e+183, 1.66633417502333e-279, -1.66036751626169e+30, -4.76889881443584e-91, -1.86036624963322e+269, 1.63569764505322e+203, -7.94838729553646e+111, -2.98404676523236e-201, 1.31120831873448e-197, -5.57968551902938e+116, 2.34826736750492e+206, -2.76200330647826e-182, 2.27994906026958e-219, 4.27593177915899e-50, 5.63564597328664e+75, 2.28466531881303e-104, 1.06800955318109e+83, 1.10729817624382e+184, -7.79654169460544e+247, -5.53919239396422e-274, -3.78768867385653e+108, 6.7188973562931e-14, 2.16039359820327e-138, -4.0633823081938e-221), d = c(-1469608998L, 1054883681L, -1701280591L, -1263446019L, 293900352L, 1397384688L, 2103400785L, 529506247L, -164912844L, 199333541L, 2031769134L, -877843492L, 851123589L, 92435842L, -506473472L, 1584646228L, -1637250647L, 1243566020L, 967176709L, 1394467205L, -637662498L, -2139070110L, 1328898733L, -1473642169L, -1802833698L, -1455447325L, -443226056L, -1295401589L, -926455480L, 1204464278L, -15907928L, 927330251L, -807425415L, 525097988L, -515621741L, 234430165L, -1064886776L, 1388879441L, -706545395L, 669571318L, -930975769L, -808719440L, 254231325L, 543290080L, -401545158L, -645428050L, 1770371984L, 1855227446L, 385228261L), e = c(-250061622L, -1612154872L, 1848940764L, -937553186L, 338674902L, 928622438L, 848672107L, 1977912678L, -51760997L, -760634560L, -583328603L, 1512997742L, 1564951700L, -1578370349L, -2135998730L, -1798546288L, -1232262008L, 919587091L, 199604325L, 339465073L, -2095577564L, 50395012L, -1338672572L, 30856375L, 1660960921L, -804672293L, -295419902L, -1609337821L, 729433903L, 2050929450L, 1932357237L, 54733927L, 1131151379L, 1974333028L, 288253617L, 1121637485L, 1411095759L, 1498413517L, 2087207552L, -1418795026L, -605617584L, -1796164442L), m1 = c(8.18711001407657e+299, 0.00468189194076409, 9.28697320897767e-257, -4.47313953005781e+269, -1.08462202709686e-247, -1.06960341877259e+114, -3.47955013064173e-216, -8.9518097672271e+215, 1.38348243341209e-136, 6.24605057871232e+181, -4.11367928127064e+80, NaN, 2.79007508688443e+291, -2.43672528268817e+290, 1.13722118274863e+165, 1.24928798805976e+186, -9.06013680652417e-190, 1.2437247084887e-163, 1.07356550066254e-51, -6.72069897320444e-236, 3.93269171816182e-254, -3.45570679530885e+99, 8.95779391235146e+89, -1.04429299113846e+114, 2.77225047393114e+43, -2.18557342377325e+139, -2.63807973264429e-55, -1.77673745822268e-44)) result <- do.call(trackdem:::sb,testlist) str(result)