testlist <- list(id_spec = c(2134772370L, 1670475584L, -713925877L, 608268992L, 885821105L, -1061841604L, 1058360058L, -691405227L, 134866795L, -1705530257L, -922256403L, 1223535996L, -1170461318L, -238832079L, -671011921L, -903281454L, 854343372L, 1139424268L, -239601351L, -1532512674L, -471606828L, -1500576385L, -1161724156L, 1513237900L, 510351713L, 1435856198L, -1161724156L, 238440433L, 422102464L, -1211416760L, -76700843L, -1613700418L, 1010507665L, -796010468L, -195556350L, -1906576473L, -2085066949L, -2086239361L, 321311923L, -155815630L, -242170687L, 496819473L, -185986174L, 1158031817L, -1081015230L, 931643723L, -1382613341L, 1282397758L, -6619363L, 920464938L, -951931892L, 1221973255L, 1725516446L, 1611393293L, -1578651154L, 1451699285L, 556495447L, 144802255L, -483533781L, 45167465L, -1954740245L, -1997473494L, -676718547L, 826573394L, 1878370680L, -1775614087L, 1461953625L, -707280288L, 1422478301L, -1186723952L, -299909857L, 1665167826L, 890915531L, 1150436507L, -1243023990L, -1061688812L, -2127105734L, 2063125353L, 394823802L, -923120131L, 345491545L, 688714975L, -169252427L, -1588279006L, -1967432700L, -1289261621L, -1326037640L, -258836988L, 708730195L, 1263678016L, 1000142300L), x = c(-3.37155219059092e+243, 4.02393933263305e-54, 5.36164962109834e-34, -2.04255753055822e-199, -4.22577599221478e-79, 1.94282076685288e+268, 7.08084578563371e-137, -3.34756543768684e+136, -4.31866135188783e-125, Inf, -4.23711944697429e+92, 3.10303935132325e+265, -1.72054518142971e-134, 5.32399291735677e-73, 3.15103195645327e-25, -1.42705006035969e+43, -7.72626578612302e+195, 2.95669731837756e-25, 7.13196471014512e+94, -8.07347849477305e-148, -5.46992185710892e+111, 4.74851660754623e-193, -Inf, -7.03023899251695e+266, -2.50726847024653e-229, -2.43969166559889e-99, 513742065.484201, NaN, -2.19600136909202e+250, 2.73258785079608e-75, 1.78066654198029e-226, -2.59281120828513e-263, -2.07936776867001e-285, -2.50119453771114e-131, -3.66927713622222e+112, -9.32273952825253e+165, 3.49857983282075e-182, NA, -1.0118976992014e+30, -5.78833953751862e+223, 1.00499854051919e+253, NA, -7.35780529121509e-265, 7.52432506378824e-271, -1.81565453151575e+235, 1.21006890229853e+63, 2.47149743486924e-281, -18.7818782291655, 1.23531646702009e+254, -1.83356834733011e-283, -4.75381982083121e+304, 6.26742888164335e-44, -5.70410934992213e-194, 7.02965163575289e-99, -3.01739528490998e-192, -2.66225128711246e-136, 6.48642004900941e+285, 8.68344585988811e-129, -2.07295526222677e+161, -1.16078271061566e+54, -1.02614026342387e+96, -24.3494579196881, -1.60835854071201e+126, -8.26809597105112e+67, -1.41860582553719e+41, -2.24041777660442e+138, 2.09311790598588e+301, 2.02163452384506e-200, 1.43209650947766e-114, -2.39949375800267e+127, -1.88316838806542e-194, 1.26562489175218e+262, -2.20704874881672e+295, 1.67301930698904e-296, -2.0725314596743e+148, 1.56153684550939e-202, -7.65515836146594e-35, 0), y = c(0.0283751841766295, 2.34817393298204e-101, -4.52314176777847e-82, -2.98778421222124e-258, 2.21674777954727e+282, 15.6459351851868, 4.63173874868327e+132, NaN, -Inf, -2.33205073786076e-68, -36848656968726503424, 6.7289175069946e+67, 8.54232235069587e+139, -4.26413151309389e-82, NA, 2.45803796571269e+259, 2.17412491600138e-167, 4.10227642973975e-250, -2.14217826189704e-69, 9.48625051973866e+122, -6.46393598392605e+230, -9.30773849687214e+92, -2.12642143394187e-272, 5.48168195037192e-114, 6.14605887980632e+122, 6.49861309795557e+210, 5.40732195219782e+39, -8.84752888706849e-57, 6.12309475580346e-298, 1.62423075386826e+247, -4.59035010158244e+33, -2.9974230048691e-263, -1.11227914980047e-51, 6.5763983625783e+218, -2.80319039968824e+21, -4.13687075752028e+182, 2.02506024523748e+41, Inf, 4.5505461748272e+195, -1.8980218356191e-280, -7.94147284744009e-280, -4.42076989940942e+33, 9.24538224584005e+105, 1.00371861782058e-271, -5.28192009842106e-56, 13825773.1391143, 2.56779575725785e+35, -1.60411040396306e+268, -6.06069935652339e+277, -3.34218971991223e-308, -1.05911457944155e+296, -7.90202685652486e+298, 4.98427866351533e-36, 122305342820550880, -3.11300002104165e+263, -4.51843172446678e+291, 2.1057324618529e+228, -1.78660775891267e-188, -3.98058532477371e-80, 2.24986714332286e+41, -9.86148765061619e+54, 2.12930511229834e+300, -1.37422724675851e-291, 8.23041246908643e+214, -5.40036613468331e+100, -5.32515450810788e-272, -4.80902301994281e+155, -8.67838265296635e-244, -6.65350266643063e+246, -2.9582887837763e+111, 1.26970802514115e-235, -9.61551115700444e-104, 2.49846512896315e+158, -1.26079890862554e+117, -2.29964900297824e+67, -3.763285525744e+266, 1.36817663338463e+171, Inf, 5.03370857139916e-307, -2.44731767216037e+261, 1.01924662476374e-09, -2135222885267193, 1.28732290433396e-198, -1.04007269733719e-254, -1.87693851258403e-118, -1.34080220726099e-126, -9.49434771774753e-307, -2.72252895572734e+61, 0)) result <- do.call(mobsim:::sSAC1_C,testlist) str(result)