testlist <- list(data = structure(c(7.94748632298326e+158, 8.92916941289555e-67,  1.06166290649612e+290, 5.75404822997406e+299, 1.68508196630884e-179,  2.70182508433427e-94, 6.3727515796762e+300, 1.14260694693881e-36,  1.41079964469006e-301, 1.50600897411522e-12, 6.04535679178893e+307,  2.88171106173319e-273, 4.64072200672049e+148, 4.51921616827428e-281,  4.06228124044725e+167, 2.28710937398663e+229, 4.67828472805549e+198,  2.79112085446485e+105), .Dim = c(6L, 3L)), max_iter = 891527258L,      mu = c(-4.27605349407976e+157, 1.57740384363939e-303, 2.69663647717392e-238,      NaN, 7.73817917411714e-152, -1.09341180406923e+59, 1.64350595578384e-231,      -1.12600602530393e+95, -1.2453498977148e+132, -4.66387583662947e-178,      -4.42139348432677e+286, 1.24462211831996e+163, 1.86044726769426e+208,      6.55013022796242e-37, -1.64997304529974e+251, -3.4571444302354e-126,      4.71292786255499e-112, -Inf, -1.31387858176659e+255, NA,      9.41551795402368e+122, 2.30906040259801e-58, Inf, 2.02891395513441e-212,      5.69291822612556e-205, -8.12270956603771e-81, 9.12696946846202e+158,      NA, 3.47578113404056e+118, 4.1066530641176e+71, 9.12458546405119e-164,      1.9636159976854e+149, -1.36639966283126e+50, -1.19717567778435e-08,      -12337922.2953323, -1.93599101929186e+214, 1.4275127390584e+169,      6.00399923291712e+136, 0), pi = c(-3.90837414888902e+230,      -6.07970997399179e-275, 1.92134588290009e-67, -5.81379410524655e-169,      -1.19432272415461e-227, -8.7089990204267e-203, 3.48067669921301e-250,      -1.46476312159697e-220, Inf, 9.45603805500819e-56, 1.02860336163973e+243,      1.21993239845915e-44, -7.46889961091318e+275, -3.34624685820372e-171,      -2.97201572720561e+255, 1.96773718360271e+307, -2.63487994231241e-25,      1.80649709551085e+41, NA, -1.43410803002477e-39, 2.33744167426422e+54,      NaN, 2.30874882998609e+168, 3.91024421795399e-72, -6.35888921580543e-90,      3.57563481650675e+203, 3.77938511597472e-155, -5.6403161061325e+252,      -8.7089990204267e-203, -1.03337034071128e-179, -1.67239378657671e+199,      -6.17889823970278e-35, 3.10539525894734e+259, -1.49012946256583e-290,      6.83285121255013e+211, 3.26030128932877e-68, -2.07626928000891e-44,      -2.19557754486736e+249, 8.05180065815684e-132, 8.20786979101006e-113,      -3.96664807589917e+68, 0), sd = c(7.08806172396132e+215,      8.76389198753971e+151, -1.10807735887946e+94, 1.53966278588887e-231,      Inf, NaN, -3.20123504511352e+247, 4.71161934024917e-138,      -9.35763470893378e-97, -6.26822952536731e-78, Inf, NA, 1.49679710009097e-172,      4.94991633444756e-204, -2.71114449585902e-103, 8.30066437704262e+96,      2.82211619142665e+26, -9.2954025673533e+26, -9.56809891296282e+139,      -2.90954488366968e-173, -1.55757481405231e+201, 0), tol = 4.14871742372374e+65)
result <- do.call(mixR:::norm_uv_g,testlist)
str(result)