testlist <- list(C = structure(c(4.73031249871747e+173, 1.69175261766742e+58,  1.30568808960612e+77, 4.74438718198395e+79, 2.42502544745798e+249,  9.35176041229892e+67, 8.66146646845425e+74, 3.87002344603756e+55,  2.84521798308756e-220, 1.3464464583444e-85, 3.76336905941377e-58,  1.19253749697048e+240, 3.52186171691847e-200, 1.32188360518278e-84,  1.13537990221206e-214, 2.21824495033792e-144, 4.48380188750929e+247,  1.36412409915441e+214, 1.32186874272026e+99, 1.34660392071491e+244 ), .Dim = c(2L, 10L)), g = c(109329935634767, -1.56778126629145e+244,  -3.32548128368121e-68, NA, 1.40893025018149e-159, -4.9591947069769e+110,  -6.15638577266985e+100, NaN, 8799.34870098471, -8.33460761068338e-237,  -1.7037054920009e+209, -4.02482580446896e+91, 7.09279830412731e+84,  -2.80739701675319e+179, 4.49429772758295e-26, -6.75478637678952e+198,  -3.27826503418743e-181, -3.99369812430806e-148, -8.20862873992291e+149,  4.20970184998243e-223, 3.7385713938972e+22, -3.52561641791292e-148,  2.96472071911179e+83, 1.43882132717723e-127, -5.34703344797717e+293,  5.03379799637291e+248, -6.4611014799021e+61, -3.99346780446101e+42,  7.87392592695638e+164, -2.05727303786577e-255, -5.86274670030025e-158,  100.117710412119, NaN, 4.68255349571683e-30, 1.86865426430376e+35,  -5.59882491899839e-302, -5.71802038043878e+169, 0.000427640046097615,  -3.29213473021851e-252, -2.15614161441302e-16, -1.0499310424265e+194,  3.74282762332394e+37, 3.55150767886798e+176, 2.62388540684638e-17,  1.50511270595615e-42, 8.94579895533534e+230, 2.1166560256609e-264,  1.3144537510496e-111, 1.46264821888541e+237, 1.27606425953752e+148,  -1.78391318719412e-233, 3.96839668610542e+83, 9.56645992550286e+261,  -5.61628138375176e+120, -2.54132770749299e-114, 8.71142512975926e+122,  1.41913730615749e+303, -8.29958156920416e-241, -5.51773135978456e+291,  110.334045678655, 2.89443616763762e-217, -1.35868306908662e-247,  -7.00142626271614e+305, 5.96965681365002e+254, 5.59701668204235e-96,  -1.85591009894171e+28, 4.1228635032896e+61, 7.54000682251191e-276,  -9.83687662737522e-95, -1.24155361859912e-51, 8.93356983917679e+261,  4.90867922167726e-169, 2.20611000986439e-194, 2.57681339875759e+62,  6.58411843111504e+136, 2.50407562853037e-73, 3.64826354797832e+264,  1.44218228815688e-37, -Inf, -1389.08534944102, 2.70934406818576e+175,  7.5225510168831e+186, -3.08094805261698e+128, Inf), N = 2032913424L,      r = c(6.1700436015997e-174, 3.15631054213086e-288, -3.55166475135969e-138,      3.08151824811949e+236, -1.67034608009732e+167, 1.40367408022613e+292,      -1.98994148331245e-202, -3.55166475135969e-138, 1.01379593965287e+154,      9.50221422247564e+138, -1.12526630831655e-178, -2.74601384574987e+49,      -5.72083520510549e+71, -0.902869492971345, 3.63092848841925e+58,      7.174436402578e-136, 5.84637130034454e+63, -5.86345169273465e+20,      -2.29632339286774e-138, -3.39394440496973e+257, -8.84329313431353e-174,      5.57885706985196e+292, Inf, -9.56038763918771e-250, -3.63254889903122e+98,      NaN, 3.18385442097027e+243, 7.05621731121721e-28, -5.61391717634539e+223,      1.23284857048489e-176, -2.4081827642395e-116, 2.2931606392739e-169,      -3.55166475135969e-138, 1.74593940803627e+236, 1.43770672585182e-233,      -7.37661381475173e+198, 1.49457572763327e-100, 1.59806205392372e+278,      0), Ve = 1.73986688591779e+86)
result <- do.call(NAM:::SAMP,testlist)
str(result)