testlist <- list(Columns = 1833484508L, DataPoints = structure(c(1.01993616516569e+207,  9.50294686417033e+300, 1.97353195936906e-172, 5.68862344633866e-44,  3.05111527810467e+102, 1.51408728364632e+254, 9.80570867292115e+261,  7.58533915366002e-296, 4.18693880010938e-60, 1.23813894641599e+57,  1.77870983770425e-69, 1.88927979374285e-100, 2.12460635520198e-263,  4.50600619695493e+140, 3.28000219167704e+100, 1.00439358509551e+135,  2.7387491859129e+191, 28.5307398008401, 2.02734282545863e+276,  8.12822937619001e+116, 3.09826904722006e-135), .Dim = c(3L, 7L )), WeightVectors = structure(c(6.76671444398607e-95, 4.65412914167255e-29,  0.922905076907835, 1.24000315429514e+83, 1.50460958951934e+185,  2.52407894513441e-231, 7.11102695837613e+247, 7.59286885635404e+87,  9.88667637557757e-110, 7.11359882765706e+110, 1.00878150016814e+168,  8.42010699026135e-153, 2.85893236110698e+93, 2.80221803242151e+166,  1.597724179262e+54, 1.49292768002576e+298, 2.27223604594613e+229,  1.04801169362554e-249, 5.18863866358803e+300, 2.97419999790045e-172,  4.12279666373252e+130, 8.56002230212771e-108, 2.9495522807828e-115,  7.77893972258958e-28, 6.73485723656998e-177, 1.54185699184728e+76,  2.35331345657897e+31, 8.23113658444585e+109, 8.19691994959155e-284,  8.96268123201163e-301, 4.72153521092284e-139, 1.54192922076824e-107,  6.01247690193478e+40, 5.87981880041213e+201, 2.46837111229871e-40,  1.79716179951192e+252), .Dim = c(4L, 9L)))
result <- do.call(Umatrix:::bestmatchesC,testlist)
str(result)