testlist <- list(mu_p = structure(c(15676496278738058, 2.61966469766922e-70, 1.01812976615197e-110, 9.39739761726357e+63, 1.57550906636751e-93, 1.4763822876547e-269, 1.69038769170113e-206, 5.33648792040299e+181, 1.67648962166715e-61, 3.05396967240215e-208, 4.61844369919636e-104, 4.43065570233114e+80, 6.10360772620188e+246, -2.78711056496352e+221, 282075050.213272, 2.35968325524176e-171, -Inf, 2.96358160277403e-149, 1.22438920849312e+126, 2.29136775506042e-125, 1.87818754862822e-274, 1.44826015643914e-15, 1.98559294505322e-246, 6.41157066013598e-149, 4.10248352978585e-08, 1.31548478373988e-228, 9.71566276002636e-145, 1.11641497935403e-253, 1.10417720514246e+161, 5.92306799847393e-200, 3.34191648015769e+67, 2.83642306944687e+220, 7.4800037571043e-139, 5.76280283416132e-06, 1.12086660349181e+111, 5.30981753408604e-255, 5.3211173127297e-301, 6.73254923465982e+140, 8.90005445674443e+201, 3571853778896296960, 4.96054161448532e-35, 6.74068931974558e+63, NA, 2.72910153138211e+54, 3.16976105099136e-225, 2.60219817080102e-152, 3.0225445679211e-72, 2.0892855071181e-175, 1.08066524981532e+195, 5.82818480124938e+68, -Inf, 1.48472736418043e+90, 1.89020226952531e+68, 4.6977139924737e+19, 4.50273704868497e-159, 4.47894710482014e-60, 7.19491606390852e-94, NA, 1.77892385606996e-129, 2.88942561909714e+147, 1.25965599950315e+86, 7.80454558701334e-213, 3.37689421828677e-225 ), .Dim = c(7L, 9L)), post = structure(c(6.33939684274507e+67, 3.99632655372999e+239, 1.67631553489821e+23, 4.22755615333768e-109, 3.12414070899939e-302, 4.53024984994056e-66, 2.38109555741324e+138, 3.9438246622222e+297, 9.86043264965883e+23, 3.2376365219739e-250, 1.86967911339809e-269, 1.86445573453556e+253, 2.64583606968799e+183, 2.41148910247243e-153, 1.57968176929537e-126, 1.51235050150389e-291, 1.31073243976065e-233, 1.47130723719161e-42, 3.80059036774326e-297, 6.511819918733e-163, 8.41556473206236e+114, 3.40949738037043e-301, 1.54489729777608e-170, 1.9031083337566e+233, 3.59064768836348e+185, 2.60760664886388e+210, 865324281.808042, 5.49258573338064e+24, 5.43938687222326e-10, 3.09175188275195e-43, 2.77768286051036e-117, 3.43043604154543e+286, 8.22504331735573e+69, 1.29413483589992e-291, 2.61771610098517e-197, 4.74858289164939e+141, 6.31506403732067e+55, 5.9047428445325e-179, 8.29293396240265e-138, 1.18139124108269e+255, 1.82907360834364e-172, 6.76859639431352e+117, 2.00600359555041e+32, 2.66063136458481e+290, 0.476140640159532, 2.21094976244476e-243, 3.19249346770209e-114, 2.56547394545848e-28, 1.23575533372453e-48, 3.7870292973129e+68, 1.11368138984838e-154, 1.65621885436971e+183, 2.34937871215304e+302, 9.08682637814284e+272, 36443612.8849287, 5.93110761095173e-172, 1.85307454946269e-137, 9.01138003241716e+273, 4.7687134584907e+256, 2.46149061043701e-158, 5.72627866329215e+169, 3.37699678215604e-121, 1.24739973514555e-278, 4.74318032438777e-26 ), .Dim = c(8L, 8L)), sigma_p = structure(c(5.44506555473498e-272, NA, 2.54999969540374e+235, Inf, -Inf, NaN, 9.97372324840826e-08, 1.91695222983378e-51, 2.16781579523759e+52, 1.28462466820868e-83, 1.76307579365343e-255, 107523.724011396, 123317.510337058, 9.33356562867447e+162, 2.92588346649452e+231, NaN, 1.27877720909998e-174, 7.40423405935349e-81, 3.42073099128159e+141, 1.06805425712302e+39), .Dim = c(2L, 10L )), theta = structure(c(954.619049032124, 4.03122089376281e-103, 8.58559690036031e-07, 1.09616541634978e-135, 1.49507500680207e+282, NA, 4.8584789701694e-155, 9.73251743751728e-257, 9.77106323362451e-95, 1.59935891271364e-219, 3.6267406926106e+276, 9.3083053297104e-138, 4.09716176195855e+47, 2.35355460498623e-176, 4.02270221514791e+176, 2.85288942665701e-14, 5.17781426491588e+105, 2.59099225458739e-68, 8.40608210163827e+118, 5.1139437074965e+143, 515176725.964064, 1.90988317189629e-229, 1.88112066722191e-140, 1.18385829419564e-216, 1.61222685376196e+229, 5.62204401130072e+284, 4.1985610420276e+214, Inf, 6.23760665871804e+256, 2.38723925812655e-271, 4.2365389081807e+262, 7.49285914241919e+260, 2.6586580430876e-149, 7.35556436499467e-289, 1.1164284165744e+200, 9.84997881102224e+122, 1.0806812155756e-237, 1.27446005289295e-225, 1.49057439250001e-39, 5.08475494093516e-225, 1.38424850658524e+117, 5.95892990386809e+31, 4.01406542506697e-209, 5.89189626014102e+51, 9.20243546597089e-140, 1.65509200495089e-37, 9.11589445703615e+29, 0.294649941123457, 7.66404604667205e-113, 2.11836915642473e+68, 1.99643491873697e-141, 1.75410010367575e-70, 1.78770353637774e+280, 1.9371099295731e-173, 663214776778451840, 5.74928421179841e-103, 1.43849600534002e-250, 4.8686405370412e-227, 4.07598509792183e+266, 5.26815200203459e+89, 2.10944085848799e-227, NaN, 5.02837169166103e-217, 4.86840351687347e+44, 5.32133725338138e-188, 8.33173932026252e+144, 5.03035051735265e-163, 3.5539319758706e-308, 2.73703710007578e+86, 261568716.067493, 1.82876403322816e-181, 5.3517636555711e-198, 2.7972089430423e-52, 9.07186166526296e+288, 4.45117581488689e+136, 1.19461280227173e-290, 4.20965945962986e-153, 158008814.622929, 2.4934853341934e-228, 1.03277606403201e-156, 7.08933039049028e-274, NA, 1.08724796700311e-182, -8.51189803621161e-07, 1.88132294565959e-193, 448817.973423928, 3.22386213553242e-233, 3.12331436710257e+53, 4.84993687143472e+58, 4.90352252085468e+260 ), .Dim = 9:10)) result <- do.call(mnlfa:::mnlfa_rcpp_mstep_trait_unidim,testlist) str(result)