testlist <- list(indices = c(-586080667L, -1070925191L, 569399797L, 17286307L,  1038026500L, 196190253L, 140141156L, 546872318L, 1556493878L,  -480386556L, 1295841615L, 1136521857L, -1661368921L, -1440295501L,  1556493878L, -793600135L, 1795351374L, 1606767276L, 21756741L,  149800613L, -431272815L, 1898005746L, 1499173673L, 238199417L,  881182867L, 1260011340L, 1715179886L, 676795151L, -1553948652L,  -2115762470L, 1066992461L, -878262273L, 730829430L, -1445805297L,  223641141L, -1399765937L, -236690573L, -932557560L, 55662031L,  -149107166L, -1419667115L, 861692992L, -1327336100L, 1958390629L,  -1643128729L, 2032562044L), min_seg = -953439588L, w = c(-1.79187310647064e-297,  NaN, 1.43639957178527e+157, 1.45107621723455e+112, -5.45941057428308e+307,  -5.31265799483956e-74, 1.81409798992522e+114, 4.9264687730854e+236,  -1.32829976419796e+284, 4.3328438298148e+149, NaN, -6.05842554753906e-131,  -1.52427519443879e+199, 1.00890426052457e+80, NaN, 8.67959965033642e-137,  3.38061282700416e+201, -2.28514363222186e-130, 8.83914522669584e-74,  -3.87515230702299e+272, -8.69782721569677e+257, -3.31789304250313e+256,  -7.92037150366118e-197, -5.27271438953074e-242, -7.32284135588642e+241,  1.25897098452746e-305, -1.19809704169863e+215, -1.59346781092352e-257,  1.40269837294393e-18, -5.06844233332605e-14, 5.73581849626534e-139,  1.2645277309794e-166, -1.79163770958994e+30, -4.46704421059527e-27,  NaN, -5.88830094657314e+125, 4.86589254290434e+163, 0), y = c(1.34181451831074e+51,  2.89823928699909e-211, 2.04351375078714e-272, 1.22858035354329e+294,  -3.85493918061207e+43, -Inf, -7.32654308418826e-289, 2.82974791719915e-262,  -1.26772378080228e-30, -2.07488453765417e-287, -9.71753709690003e+126,  1.70285429795086e+286, -2.7780814543732e-176, NA, 2.35713041511002e-132,  -2.51889617167293e-196, -6.77559552406281e-259, 4462.50782359945,  -8.57630665248091e+100, 2.46981542858793e-183, -2.62717487104858e+280,  -7.72648739929334e-85, NaN, -3.07788137486489e+300, -1.22565089769447e-82,  2.54415171167277e+207, 1.82498083599959e+306, 1.12936719942482e-292,  1.95203742588618e+102, 3499537413929669632, -9.51480391500135e+91,  -1.78483928048802e+253, 9.48344481308025e-119, 1.28225298908717e-226,  7.80836148760709e+254, -3.52235765243374e+164, 1.36689277334388e+301,  -9.7470517645563e-255, -3.20678209112407e+52, 8.12096726174692e-69,  1.66568392871968e+83, -6.8169362463663e+215, -7.72648739929334e-85,  1.30354857007588e-104, -8.15566941632623e-19, -1.10106378693386e-66,  -2.13687359898619e-193, -1.10890569510818e-185, 1.73128390576547e-243,  0))
result <- do.call(RcppDynProg::const_costs,testlist)
str(result)