testlist <- list(df = 2.29353710178026e+228, gen = structure(c(2.98257143998687e+43,  1.18832923381206e-231, 4.74135488866358e-154, 3.28894461422678e-283,  8.5930260772863e-19, 6.87146211583896e-302, 1.39927624992918e+175,  1.12557823099042e-46, 2.08171154591226e-51, 3.09972203339762e+149,  1.66328070743658e-231, 1.17453998025938e-296, 1.03951236705931e-119,  4.976674510317e-36, 3.74245244633756e-38, 1.47316149205442e-280,  3.67748497913925e-292, 6.00091588348433e+172, 1.55718298066112e-251,  1.36940203186296e+292, 2.55548479710181e+124, 0.000190412891047356,  2.74823717698433e+51, 9.36483864029328e-116, 1.56051115878315e+147,  6.46510748791804e+161, 9.20899540600582e+80, 2.17830473211738e-206,  6.21049529676646e+72, 4.91066948186998e-150, 6.58025669895702e-57,  3.29386341624203e+178, 1.38891940771134e-204, 1.051418028331e-08,  5.36500284495344e-284, 4.00823416046643e-224, 5.43824917435915e+215,  6.98910884265027e+171, 2.2206514905322e+120, 1.11700261802865e+142,  4.61603282447724e+33, 6.94667830037807e-64, 1.52766006415715e-258,  4.17410282234969e+99, 1.53628595671636e-130, 2.40303143175013e+250,  4.10014251274014e-131, 1.62452791983432e+239, 5.45243805441119e+266,  7.95964182482287e+145, 720530.984477026, 6.709589834751e+128,  1.99258666564153e+175, 1.80412985916344e+240, 9.59960902432068e+51,  9.44060124128885e-265, 3.05356206799971e-76, 5.70780266653137e-78,  2.46932631645557e+194, 9.46324169097188e+29), .Dim = c(6L, 10L )), R2 = -2.47783063310379e+241, y = c(-7.32744502441901e-108,  -2.60782371092041e+129, -Inf, 2.49465353049542e+113, 2.31286309815504e-07,  3.53874042324858e+205, 9.09259824235853e+171, 9.69867576284693e-219,  -6.10598609797575e+131, 1.54304595629471e-183, 3.08179030826639e+261,  -3.24006818151775e-128, -4.35039189584393e+252, 4.43460852340621e+268,  -9.78854389104616e+226, -8.28697728048666e+42, 5.42205080220631e-48,  -39469200419659144, -1.33386511853725e+158, 1.11616754397505e-205,  1.86405059234724e-211, 6.30795766267536e-78, -9.63815408416253e+289,  -2.06369752122719e-208, 2.12902326359742e+251, -9.47091190060113e-273,  1.28932995378476e-171, -2.46152409269849e-126, -1.73171743320895e+162,  -2.93424270685707e+240, -4.48407274886736e+21, -1.49551090673133e-120,  3.84676157905094e+218, 6.62379827770729e-117, -7.61277025330003e-252,  9.98782202891811e-286, -1.86078536369806e-117, -3.58675647967735e-181,  7.63129036623453e-274, -4.57492288544529e+226, 2.99210360667249e+251,  -2.69906789200346e-293, 1.53939404508259e+299, -4.0328605881824e-228,  1.85508103697579e-55, -15355.1507200409, 5.77281445537389e-282,  6.68535328964227e+152, 1.25430851445854e-12, 1.01098310215527e-237,  1.06369294360047e+110, -4.57519614111969e-234, 5.26617988108622e+245,  2.13758443209082e-126, 1.47494459396585e-08, -8.69390924101795e-131,  -1.32691544498203e-215, -6.0786188012066e-257, -4.81043340188063e-222,  1.47994400068037e-279, 2.03313472324912e+266, -3.94267224147224e+228,  1.5748945138922e+45, -1.96233023818298e-23, 2.58652835450994e+59,  -2.20827623602661e-222, 1.96316452050659e-17, Inf, -6.95446993819651e+194,  -6.44863059787804e-265, NaN, -1.56201359868242e-105, 4.57948450984219e+175,  1.16279721968124e+257, -4.43292528180896e-307, -2.35376203553044e-83,  1.7866249809501e+136, 6.49179285486459e+276, -2.21424154941328e-192,  -7.30942890733414e-299, -8.1080199253295e-116, 3.04780950348398e-235,  -2.22955006882708e+36, -Inf, 2.76209260710329e+235, -4.00899369820541e+203,  1.90105122539329e+196, 1.05826919361689e+134, 1.24576851629691e-303,  2.71038848420249e+63, -1.30688209997769e-152, -8.65525115533786e-140,  -7.362581858107e-87, -4.46914082423275e+65, 2.51202952739285e+191,  4.46274047596631e+278, -3.56773080393458e+146, 0))
result <- do.call(NAM:::emBD,testlist)
str(result)