testlist <- list(data = structure(c(1.25681304964856e+196, 2.36460408901756e-305, 1.14912731279741e+49, 7.70456074555472e+232, 6.91550522209007e-249, 1.90442257547403e+148, 3.72134039197819e+93, 4.28158224539862e-113, 5.62308769320449e+114, 1.53228022606762e+229, 1.90426199057744e-235, 7.60969159770891e+182, 4.16952249341518e+124, 1.10189779681981e+185, 1.94448221064605e-220, 2.46886837878214e-146, 6.10255306442276e-209, 1.56224722837065e+244, 5.38425185998368e+46, 1.10298683317884e+256, 2.73876391958974e+161, 2.37403636667366e+32, 6.87093163109326e+227, 5.32071903056064e+250, 6.82596908680456e+232, 1.88844049754449e+155, 2.21753522172356e-51, 1.02367015488151e-277, 1.3072987220231e-290, 4.94624398663687e+253, 4.7283316050703e-129, 1.61893413947026e-192, 1.88731388571494e-240, 1.65257351817037e-53, 2.11308970914891e+253, 2.44314933161766e+89, 1.58842969909132e+102, 8.21864272723339e+115, 3.67130400253399e-121, 2.09187075535693e-34, 0.463408990746892, 1.24330139493562e-285, 2.35481295028317e+280, 8.6413163341205e-108, 5.36968137076959e-156), .Dim = c(5L, 9L)), mu = c(3.64486930333827e+269, -1.37764574277599e+129, -3.26456212914808e+302, 6.25762943873509e-298, 7.05676850273602e-204, 1.3851225170911e-18, -2.54109184183454e+94, 1.75092455211564e-295, -3.69864842315451e+260, 1.0157306617407e+167, 3.8695731278868e-37, 3.55475108692579e-118, 6.6139044051439e-37, -1.56911065608803e-136, 7.96217652977916e-274, 2.20657070041072e-198, 1.20402431386369e-192, 5.83494837304334e+51, -7.88472333324926e+38, -4.65349852313342e-132, -5.16360499087908e+205, 6.82938357375953e-143, -4.20905865887731e+273, 4.60477352630384e-164, 9.57001677313175e+156, -2.71815494283596e-107, -1.2610351413328e-114, NA, -1.15489133145391e+107, 1.04960352832458e-36, 2.0798988695125e-178, -4.63263307313873e+284, -3.69025661340462e-278, 5.21123491952075e+199, -6.92119458217853e+122, -6.51642253138708e+145, 2.86220043819671e+303, -9.0096181169561e+207, 3.92975536132186e+293, 1.01073595423773e-114, -4.99368501684179e+131, -1.2610351413328e-114, 238785208661307264, 1.06301786842654e-255, -4.66927405961739e+138, Inf, -5.36768568660659e+300, Inf, 3.33990059694002e+223, -2.16684295472341e+177, -1.56660160459433e-245, 5.94885317316364e-107, -7.27954486392394e-17, -2.33303029173127e-268, 1.79842110737671e-92, 9.61230527657366e-200, 11678.4768747397, -1.27573581419016e-50, -1.9119852635491e-104, 2.13628680009615e-235, 5.07589252174827e-157, -1177933818006829, -1.23238571961911e+85, 3.61260243310972e+249, 1.95646458443462e+231, -1.75197290436387e+84, 1.41465781177425e-179, 5.74521138130228e+274, 2.09261130105829e-84, 1.71270073911314e-96, 3.00564730230756e-36, 1.03547106934926e+68, -6.02673620560802e+300, 8.17036734808574e-103, -1.97697385506864e-229, 2.23763438765432e+71, -2.92257530275578e-269, -1.77925849744219e+23, 1.82795102165748e-187, 1.11637844465214e-193, 8.79046504997261e+140, -3.37542029634309e+141, 1.76821006719037e+206, 1.05950143039525e-209, 6.43595657561276e-136, -1.32021682830514e-148, 0.00832045146054187, -5.27335119003357e-193, -2.46780373664423e+219, 0), pi = c(2.01100732201279e+211, 1.28031144566777e-37, -5.70383660670939e+162, 1.50619055563166e-190, -2.27660048212971e+251, 4.43282191398497e-297, -2.90742960761563e-104, -1.2368423702266e+274, 2.38260418802203e+31, Inf, -3.83845395555805e+26, Inf, 3.79408150032116e-297, -2.28174637708294e+133, 5.07992415756165e-80, 1.33622880382943e+213, -Inf, -1.20974942483749e-186, -9.39685789755302e+82, 1.07301151294787e-200, -8.48117784911105e-126, -1.11652606132137e-257, -2.47337196271285e-66, 1.50619055563166e-190, 2.92935399472871e-60, -1.61703838344464e-206, -6.58201524084659e-68, -1.87583415181296e+87, -3.53133441127993e+274, -6.4192590944954e-257, 2.47155634398657e-286, 0), sd = c(5.77603016605536e+227, NA, 4.46178267736138e+263, Inf, -5.45404169599248e-81, -6.06006146228683e+35, -8.99398865042782e+216, -2.52545614852527e+148, -248836733798.445, 3.66559785175814e+50, 4.05390468665646e+307, -2.88344154969219e+114, 6.07678215369997e+200, -8.20251178891129e+27, 1.0848690784536e+225, 6.54547558294162e+84, Inf, 5.12991421892909e+270, 2.43128731892628e-299, 4.78263122152262e+306, 0)) result <- do.call(mixR:::loglik_norm_gC,testlist) str(result)