testlist <- list(k = c(-6.99142120902069e-124, 2.0785083252939e-103, 7.72249180597241e-302,  -8.52403794136461e+29, 6.54645123160025e+307, -7.62304005607347e+303,  7.26661287306189e-147, 3.61414045342877e-230, 1.5666684157992e-165,  -3.70298622126995e-298, 2.33853814832291e-44, -1.01095462446444e-65,  -1.22640561857282e-265, 4.17034303348762e-265, 1.01488322197682e-186,  1.35911090086859e+135, -2.40521904375963e-299, 2.82443849658939e+226,  -3.51724060104633e+116, 8.70315758344995e-129, -7.04923837160184e-135,  5.30981224694473e+188, 8.64347986370045e+204, -8.9735847280203e+42,  1.00992203260055e-262, -4.6979231223347e+116, 3.24332374286586e+103,  -2.84532333704125e+116, 2.86362250945331e+261, 3.96488424135016e+47,  -1.70419953767368e+113, -5.6343222273895e-121, 5.2780891194977e+135,  -8.1756095098794e-140, -2.47487662167122e-166, -0.061912507951875,  -6.87552476947355e-257, -1.09558508919433e-76, -3.68191290910012e+21,  4.74817246411231e-08, 4.53339209984636e-101, -3.98674091563568e-297,  NA, -5.25503274856738e+216, -Inf, 3.02413270303718e-177, 1.6635231255698e-123,  -Inf, -4.03215153660147e+215, -4.88600787693227e-161, 1.29389852290292e-19,  -1.29347484807366e+255, -2.96656213060031e-23, 1.08569434370148e+307,  2.04474687145749e-265, -2.44858344427844e-160, -5.04278217435488e-60,  2.32260872482887e+128, -2.28218140766608e-259, 5.06268012301846e+137,  6.34564723970224e+153, -2.79329806482198e+122, -111214306276816,  -2.46690671593902e-167, 5.37502480753972e+288, 4.26466550252661e+150,  -4.87254513338384e-65, 3.12145424646656e+124, 1.05943406862504e+296,  9.04664763193721e-276, -1.18893788986197e+51, 5.49603068234742e-272,  4.08785568030319e+43, 2.83690555324556e-87, 1.0939314983886e+231,  -1.18388018894252e+163, 4.92548721906969e+25, -8.71540812903448e-115,  1.70727212119696e-98, 6.48962375230375e+221, -1.28581089561606e+240,  2.83074109952846e-145, -7.30014323944552e+161, NaN, 3.7730638324168e-135,  -1.06363913262093e+141, -3.40359287985036e+54, -7.15902611118595e-241,  0), lambda = c(7.84389057334735e+105, 8.73866955595261e+249,  Inf, NA, NaN, -1.86735568263772e-193, -Inf, 1.5431383781948e+299,  1.6487065806898e-226, 0), pi = c(-9.75244778027221e+65, -3.75990342365801e-77,  -1.53283255977714e-09, -3.21614714349232e+24, 2.02092529230947e+239,  2.47346008711525e-166, 1.64495299905914e+162, -1.36947106554194e-263,  3.16473420919872e+47, 3.91877537537364e+255, 7.68697354255575e+207,  2.1358762285823e-55, 1.68622768487662e+286, -9916.42423611984,  -1.47500011035417e-292, -1.82165295998593e-214, -7.2723699993344e-49,  1.08016755318908e-60, 1.08863401568665e-306, Inf, 1.60727008816343e+213,  -3.08221827038566e+112, 3.25347672101439e+265, 4.65623516418899e+133,  8.09502063055027e+118, -7.70142203143565e+284, -1.36947106554194e-263,  2.20333627497865e+54, 1.64952847384732e+150, 1.36964441651455e+175,  -4.4021901384819e+278, -6.26357409623436e+239, Inf, Inf, -3.12376486938443e-55,  0), x = c(-3.45158192410155e+254, -1.22846873531893e-139, -1.42607341919815e+63,  -4.71630313686496e+52, -4.51753424498579e+203, -1.18149331251321e+34,  -4.96495382528948e-289, -8.80373825407669e+63, -2.23422840429573e+21,  -6.35904790546587e+221, 1.82702084249002e-200, 6.69074585734111e-247,  1.83192197568755e-65, -4.68282041574843e-145, -4.96495382528948e-289,  -6.21738159515068e-64, -3.38219538295441e-267, -4.96495382528948e-289,  -6.63412355260101e-136, 5.27567972474533e-266, 0))
result <- do.call(mixR:::loglik_weib_C,testlist)
str(result)