testlist <- list(k = c(NA, 5.96177485390861e-165, 4.79822116261583e+280, 9.42199317859637e-96, -Inf, -Inf), lambda = c(-5.59495007149589e+126, -2.95426446426682e-101, 4.02120267112781e+201, 1.13978396962853e+306, -2.69015443391613e-61, -5.89653665219328e+168, 4.60974630613956e-06, -0.280827122275143, 2.30542327123516e+243, 3.42348900350729e+276, 3.55774770744777e+53, -1.7596190667528e-151, 2.10521994818949, -3.55552049676039e-178, -7.06098594225817e-297, 8.28023958414637e-125, -1.35820026513044e-146, 3.19471953119539e+118, NaN, NA, -6.15737325423676e-281, -7.50063047973817e-121, 6.75108569902473e+249, -Inf, 2.21579969237483e-36, -2.76204008169171e+200, 3.82289100388989e+261, -2.42552304248832e-12, 9.66608527353533e+248, 2.12400739776935e-40, 2.14401393596083e+149, 1.50853930916529e-89, -5.77685372890341e+40, -1.23458908926876e-20, 5.15244036085123e-244, 8.87354400320445e+204, 6.54560516285748e-295, -5.36437894984515e-213, -1.35668151479914e+26, -Inf, 1.18565585172956e-212, 3.0341452306087e-138, -471876.58539206, 2.56784500438245e+161, 473724329.302842, 3.41083698668663e-148, -1.00626937563919e-268, 9.90479551244349e+230, -1.79908928944408e-69, 0), pi = c(1.44495885184059e+223, -6.84102813119736e-150, -1.30952261160423e-79, -1.06804801489211e+98, -2.8253567809627e-24, -1.3473786818533e+280, -4.9182313071961e+202, NA, -8.26180844788918e-116, -2.72948765711474e-236, -6.50651524376212e+240, 5.61576864421528e+84, -6.20517720841279e+203, 1.39950981889769e+167, -3.1665365055332, 2.5798552048711e+281, 3.44671133050415e-133, -1.68450384778882e+167, 4.34548251072269e-99, -1.30952261160423e-79, -6.31713941457445e+295, 6.43801773412616e-172, 4.26246422236288e-258, -2.28623683285336e+103, -9.87406198945964e-267, -4.34065518026003e+79, -3.23348497456952e-293, -4.025721971733e-287, -5.45587029174618e+87, 8.30641868767789e+190, -3.12653677839385e-28, 1.57959819733858e-221, 5.57881244885099e-111, -1.91607662205911e+111, -5.64586058086416e+107, -1.55135929313934e+116, -6.37985909001853e-192, -1.32567313991723e+140, 6.38000154006532e+260, -4.32108186660048e+66, 4.44563343489027e+21, -3.25141369241009e+47, 2.94844723501933e+187, 2.2548949843237e-215, -2.20105899991879e-115, 5.15408271640791e-180, 1.26548624237838e+217, 3.7035047657675e+118, -5.50532636393199e+75, 21947268782.8124, -1.30146461887298e-200, 6.0132110807903e+221, 2.13495250813273e+249, 1.30595670750351e-254, 7.63694346053603e-94, Inf, -5.21732015385279e+298, -2.76565645245301e+271, -6.41800513121688e-13, -8.97656244274836e+254, 7.18039910300979e+225, 2.40128688674391e-50, 1.79792349163448e+221, 2.80148361455536e-164, -1.94153524852903e-181, 2.91380504763639e+143, 8.04671912273943e-289, -4.9833141463646e+61, NA, -3.3147013442734e-281, 11713659.0692379, -6.9165990706646e+154, 5.4656063776608e+100, 0), x = c(-1.18530109474265e-278, 1.30118184894677e-32, 6.59618007475265e+210, 1.77149897690384e-266, 8.25655242170526e-116, 9.1228401246804e-155, 4.84593983657097e+172, -430041416400276608, 4.825306223193e-32, 2.25761004805338e+23, 9.95727421383482e+229, 1.33519260654985e+60, -2.78419209830896e-238, -2.35717800240848e-259, -3.60915101966448e-83, 1.13552167351278e+151, -3.02666030306649e-212, 2.657342431656e+149, -1.70646092170523e-127, 1.12420247376797e-129, 2.01860471875828e-18, 1.43981581173683e-17, 6.80448780320662e-124, 6.58973684652258e-265, -4.66730906156021e-123, 2.91718825069831e-95, -Inf, 1.9522075797367e+43, -6.15091183414625e-296, 6.58973684652258e-265, -2.94663268724795e-156, 5.684184865003e+38, NA, 5.35481625267382e+258, 918834010316.951, 1.0401162547418e-283, -7.99053573918102e-130, -1.85048056566961e+166, 6.02295153018337e-170, 2.35864486615464e-95, 3.88476634856659e-262, -2.38734016176236e+154, 8.06379207587452e-220, 3.23614292006429e+52, 1.26604644610231e+30, -5.84151161282899, -1.6539568056558e-68, -3.59380681822761e+115, 3.171841800604e-23, 3.24421037280581e-261, 2.79644578565552e+267, 3.03050428472966e+118, 1.93327146633003e-199, -1.97641549229226e-42, -1.34831288691022e-111, 1.60971148413059e+68, 16.4297500700744, 2.74648518248973e+173, 1.52346628854398e-167, NA, -2.5870662814326e+133, -11026208.065079, -2.16089681042662e-10, 1.52610696367688e-179, -4.20267837722627e-103, 9.57174881019613e-06, 8.55074744040169e+91, -113299104.300357, 2.79430459679754e+258, -6.01430361460918e-135, -3.15830065640369e+164, 1.79647017583562e-118, 0)) result <- do.call(mixR:::expZ_weib_C,testlist) str(result)