testlist <- list(alpha2 = structure(c(3.60908643865453e+224, 1.11742128101669e+83,  1.97870122171185e+143, NaN, 9.37480792170664e+280, 3.07504141416437e-136,  1.01645313737868e-124, 1.00679150745081e-73, 1.27047634996911e-62,  2.13409614918679e-145, 2.01768927817267e+47, NaN, 4.713762584588e-48,  1.7506159598139e-260, 4.13272931804741e+261, 7.50347923086546e-71,  NaN, 2.90402077461892e-286, 3.56215199780015e-230, 1.43677827629537e-133,  7.46114516421967e-258, 5.0141334820982e+184, NaN, 29072.6257709098,  1.41003229091807e-86, 1.93643921836204e+180, 1.99326012973524e-62,  1.39815628510302e-16), .Dim = c(4L, 7L)), linvec2 = c(-1.48913015309838e+39,  2.63725453740933e+261, 4.51945682641686e+163, -7.62766352772688e-53,  2.09617024723214e+257, -4.68831427091371e-154, 1.11903477574716e+232,  3.26286409658457e-84, 3.96692931002303e-30, 1.30945164738812e+193,  2.81167291417672e+284, 7.81344866205955e-69, 8.06437782716787e-68,  -2.43432862423038e-282, -8.66082579829582e-93, -4.44116795166925e-236,  8.79838796864221e-85, 1.18757307056025e+27, -1.93958723679818e+293,  -1.4797859307384e+74, 1.0829478318779e-20, 3.18894353286941e-291,  1.89411227126564e+44, -3.25228381230693e-308, 4.16222053993285e+189,  -3.47187673951786e+104, -9.61683738769097e+161, 9.71804279585044e-239,  -Inf, 2.17299108064979e+107, 2.26895126666313e+150, -8.40097381850818e+307,  1.13760189546125e+200, -2.04311773710004e-81, -5.96231150102709e+47,  -3.45018564135406e-87, 1.87350069967456e-225, 1.78742032507512e+27,  1.5457560660078e-223, 3.9114491893228e-103, 4.75074045149166e+44,  2.03194847659285e-141, -2.91324326516138e+212, 1.20155833324313e+91,  -2.30373608285758e-256, 7.8916857411679e-125, -1.33791239970731e+107,  -1.0992233037189e-83, -8.48368816965793e-131, -3.27398714521823e+63,  -3.38410933449517e-93, -4.03376812105127e+85, NaN, -6.783456706827e+233,  NA, 6.88318444663651e+174, -2.75811974752553e-154, 1.66811523321678e-190,  -1225456.09007819, -6.72853033935425e+227, -1.29886619450838e-120,  3.20339905305954e+244, -1.21482693215067e+115, 2.43581014863413e-09,  -1.64267229240635e+77, 1.69376167176247e-180, -2.96113780540984e+227,  8.68343785112204e-195, 1.0935372876868e-207, 8.82812941134646e-118,  1.0935372876868e-207, 1.35097132339656e+180, 0), Phibig2 = structure(c(1.91920560976224e-251,  1.19983215734501e-56, 3.97230794012325e-282, 9.8809790802306e+146,  1.14404842490201e+49, 2.43474269728453e+92, 1.3877521109169e+306,  1.35413622853913e+115, 7.68617398266382e+109, 9.15706247400523e+63,  7.08913618501716e+37, 1.96735162696382e-42, 6.45490835685765e-158,  2.35456609220815e-241, 6.26858003024816e+90, 1.97067341964444e-116,  1.73408606167916e-76, 1.07094280555022e-152, 2.31168622963039e-123,  4.74814912605682e+224, 2.23300712691874e-05, 6.38351250585375e-30,  7.88751888958809e+154, 1.64627054876331e-39, 4.60144321334404e-42,  7.90001325707782e+259, 2.7444644769296e-90, 2.58189658029914e+126,  1.56245155619712e+145, 2.52199076026508e+208, 1.11352244738495e-44,  3.3062300252042e-211, 3.32074812908401e-294, 8.5229080219038e-300,  1.20500293149312e-77, 1.19607444285061e+154, 6.9658234481955e+280,  6.00419112388813e-293, 7.19069106678401e+258, 117998678470259,  1.65138968525956e+122, 2.33680557214836e+99, 5.02357428992953e+207,  1.59791342550672e-256, 7.32104516887178e+28, 3.34324391896227e-161,  5.55107489256472e-275, 24037725099831784), .Dim = c(6L, 8L)),      Phidoublebig2 = structure(c(1.72540098540769e+197, 208012207133834,      6.56592721751082e+58, 2.13603796168785e+295, 5.7297176729796e+194,      7.09185704492721e+64, 2.06192415339001e-108, 3.84438402927194e+89,      1.62976444853173e+230, 5.34545652433826e+229, 8.01878305213024e-131,      1.9479843961935e-168, 1.08050714859916e+129, 5.71335635274516e-145,      6.84371921171633e-06, 2.18989586867718e+84, 1.82507578491237e+40,      1.77685927031858e+208, 2.4739840727098e+295, 4.48567947875848e-226,      6.85627091048461e-186, 6.94396552748041e-279, 2.23951776884943e+38,      9.37670088596549e+25), .Dim = c(6L, 4L)), Tmat2 = structure(c(8.3564896794104e-72,      NaN, 1.37276977453768e+104, 2.57160023900651e+181, 1.6733373475403e-12,      2.33198645148093e-141, 4.20261968636881e+64, 1.31649218208095e-288,      4.75288310040198e-173, 7.2765164519369e-87, 1.48987053342105e-190,      1.5070682520826e-161, 1.19624780686979e-05, 2.53940681269447e+218,      8.82967206111986e+277, 4.69528285092364e-94, 3.88055301890848e-302,      2.66676777863183e-182, 2.87751672172759e-120, Inf, 9.41720261969655e-98,      34005161.4073781, 6.20030799607577e+149, 5.74822598608421e-280,      NA, 7.50394301890201e+33, Inf, 2.25203212013416e+72, 5.34935791460561e-225,      2.35912558742815e+238, 0.0348762865116351, 3.86873688107215e-187,      1.77019724585171e-145, 1.5416007142739e-258, 2.7146264796548e+197     ), .Dim = c(7L, 5L)), tUeach2 = structure(c(1.42320728643954e+294,      6.59005957077002e+161), .Dim = 1:2), Udoubleeach2 = structure(c(2.50937436868299e+129,      3.31736119031243e+299, 3.65070211464959e-277, 1.3362090999166e+199,      1.18021729761963e+94, 3.73762254884432e-116, 27829240762354917376     ), .Dim = c(7L, 1L)), Ueach2 = structure(c(19495.4733643535,      6.29336929083854e-136, Inf, -1.19917669599061e+64, 2.85180401512361e-10,      3.52185396541008e+264, 4.73704800285712e+50, 1.21721035517303e-188,      -1.19917669599061e+64, NaN, 3.33972734062324e+183, 1.34497321485729e-190,      1.06209309449359e+99, 3.1625049096598e-100, 1.97129627227269e+264,      6.79141355367218e+176, NA, 5.91731590087756e+194), .Dim = c(6L,      3L)), XW2 = structure(c(5.42594007761425e+172, 2.97533793672179e+108,      1.62022861554796e+280, 1.53905677122019e+155, 9.2775216325869e-30,      9.77147071407383e-303, 1.08205232804057e-174, 6.24011224725079e+102,      4.90515377008435e-89, 366507.022573918, 4.47898964592338e+55,      2.16915960738267e-89, 1.09102810027081e+214, 2.55999674203221e-30,      5.11217475971564e-130, 4.70585633192213e+114, 6.57591646620679e-120,      1.89613971558153e-215, 1.28960118637895e-189, 7.10381307138074e+227,      3.49653696563785e-114, 4.69198374960115e+249, 8.47431126523472e+35,      2.74387934912806e+254, 1.99724715444675e+298, 2.35048476090994e-123,      1.99462670529411e+145, 2.30874975616827e-279), .Dim = c(7L,      4L)))
result <- do.call(PenCoxFrail:::IntegrMultiCpp,testlist)
str(result)