testlist <- list(X = structure(c(2.71129416302737e-241, 2.70249957872994e-151,  2.02638613436225e+285, 3.10158460122765e-277, 1.66086084638944e+190,  4.85459521872461e-267, 2.04770319083866e-118, 1.48941175841014e+186,  1.17191745107362e-151, 1.31733475617786e+217, 5.47037216100376e-127,  1.7993081256706e-158, 3.32469564407942e+180, 7.15838206099947e+126,  1.25839197971152e-73, 2.40273970203777e+23, 8.63686433382663e+39,  1.50149730069211e-75, 9.11803567894899e+224, 5.46011253538505e-187,  2.49756925992985e-198), .Dim = c(7L, 3L)), Y = structure(c(1.40684767876145e+278,  7.99037480745162e-138, 1.62944145838738e-124, 57.0409255135392,  3.18120561122758e-38, 5.02701370200432e-259, 4.33212090922345e-97,  7.24391414358672e-90, 2.19956430982756e+254, 2.12826600072111e+183,  22993.0361576113, 4.42611752451308e-104, 9.5663203286658e+287,  3.84118759702633e-256, 2.63812447379923e-142, 1.23585439892125e+27,  1.49547863704009e+187, 1.16767714912325e+103, 3.93615236818544e+278,  2.64911337426203e+57, 2.43293130771942e+242, 8.3158541114719e-97,  7.80138454756769e+170, 3.24607399403241e-98, 8.45124558257833e-22,  1.29777960958365e-14, 3.72185113222421e-118, 1.43203280650592e+137,  290637424654975488, 8.85929146742978e+114), .Dim = c(3L, 10L)))
result <- do.call(NAM:::mrrFast,testlist)
str(result)