testlist <- list(x = c(-5.24593978206091e+185, -3.66973765954909e-224, 3.40625648904984e+277, -2.33377948909421e-137, 1.21907423971304e+74, -6.02530377298879e-22, 1.15694851502154e-119, 2.34594428048556e-234, -1.19484683140464e-135, 4.19962762674148e-299, 4.95440248298007e+27, -2.19209642438409e-203, 4.96555984220112e-228, -1.56073538443619e+208, -7.12888065304943e-111, 5.92056201678542e+50, 4.2906249661908e-266, 5.07679909355502e-213, -1.14214567419385e-246, 6.92053090631204e+62, -3.97608529790195e+281, 4.01027624660769e-60, 5.18615934087878e+289, 6.95089362582284e-282, -4.59716518289558e-193, -3.64087505352612e+31, -2.40566096026154e+63, -6.97851659904018e+218, -2.71680731795096e+180, 1.0617287527816e+209, -6.21211417932629e+243, -1.44788737665797e-295, 6.66690474914581e+283, 9.18587161117411e+42, 3.27208811192805e+149, 1.91687894014313e+154, 3.44791426328344e-108, 1.84540585293522e-283, 5.76322153697304e-238, 4.09357479923395e-07, 7.99808898975495e+148, 1.00124003299917e-54, 7.05755023975539e-209, 6.75971365454318e+221, 9.02231436725262e-206, NaN, 9.70939683017935, 1.92313986300838e+250, 0.415273611637081, 1.9170433476207e+200, 3.25793116390557e+36, -1.36435831875727e+143, -8.45998785033197e-76, -3.06319858513588e+268, -2.22216877070971e+81, 7.53371906833557e-224, -5.72096971228375e+129, -1.46070174605289e-143, 4.08607981134116e+296, 3.666899866661e+165, 1.55143789142375e+143, -1.78681897439395e-280, 1.02468866553813e+242, 1.23012841300954e+99, 9.0555136395928e-305, -7.34919805759968e+152, 1.59731032095795e-161, -2.63436427814187e-64, 4.76003839225203e-18, -1.62178016443039e-59, 4.27752324741694e-74, 1.6086971448977e+306, 1.67223080834819e-274, 1.72563360050785e+294, -8.3870539687136, 3.40007006477959e-20, -8.15416347015919e-206, -251030680.451635, 1.79151482525376e-16, 1.60349788878261e-285, -1.33097312085734e-35, 3378807110931.12, -1.57883444324192e-221, 4.1483130904654e+276, 7.62568183931865e+94, 5.43743780164233e+258, -5.96478696410988e-56, 1.92313986300838e+250, -2.41177049853615e-232, 1.92313986300838e+250, -1.49888216184698e+211, Inf, 2.94157338596622e-88, -3.05945552328175e-21, 6.55763122497726e-63, -1.7018161211712e+188, 2.54035971507389e+39, 3.13392480020133e-161, 0), y = c(3.56222583469392e-174, -3.26620643339296e+176, -0.000118284945980428, -3.30384249334252e+131, 1.22379813752722e+215, -1.92039221832506e-82, -3.74919392362382e+83, -5.05077946598999e-303, 4.21794279947887e+215, 8.89364028489926e+90, -3.11725694093391e-201, 1.79903538650754e+24, -1.49045629536805e-222, -Inf, -5.62911268327046e-124, -1.94186481824311e-221, -3.56985390476696e-226, 1.71756324353348e+26, 1.01160428613979e+57, -2.34668069435569e+284, 2.68987296382464e-61, 7.2377233646729e+289, -6.6821852600899e-141, 3.84377979424749e-168, -4.11158105291531e+140, -1.4869294440992e+165, 2.21868854167559e+245, -9.3859601941463e+238, 1.03349055064201e+110, -2.72162097846902e-277, 1.87933409873593e+182, -7.996895186045e+40, -153632664029799, 9.85236616647124e+162, -4.37371173399758e-08, NA, 6.81049491079403e-275, NaN, -5.08284076495131e-258, 1.02266101004796e+115, 2.05084883197859e+281, 0.00317414345444766, -1.08811499746831e+132, -3.96968697808623e+149, 4.89304964368503e-92, -3.11725694093391e-201, -5.0173407411702e+117, 0)) result <- do.call(segmenTier:::myPearson,testlist) str(result)