testlist <- list(poly_x = c(-5.70400762505135e-238, -2.07081855709675e-80, 8.5455382271307e+192, 3.13880924774272e-45, -1.31829639664378e-67, -3.88007310706922e+111, -2.73349784924818e-273, 3.74346808450414e+144, -1.11691051946455e+197, 8.24572025426636e-140, -3143310072.61663, -2.7154489829733e+175, -8.99302500161768e+140, 1.38164596936339e+132, 1.0427490088369e-173, 1.33396984348503e-166, -3.22048262438252e-233, -899109387869.941, -5.80325779441735e+65, -3.02866560953896e+104, NA, -9.06850566920262e+282, 4.63877483327205e+62, -5.6240952560463e-74, -1.4458869385411e-68, 0.0071543511529997, -1.70060342788749e-43, -1.85921099298703e+32, 869729451107702, -6.40224370293622e+262, -6.25281312970967e+211, -1.23564473316565e-266, -3.01267155424124e-77, 1.38496627364502e+41, -2.70179665334174e-176, -7.77752531682237e-298, -1.63731843829226e-198, -4.62759232740779e-205, 1.66633462670291e-32, 1.45342792648455e-268, 4.90457643113392e-204, 2.38395639244005e+148, 7.77331130481836e+295, -1.20509976596249e+99, -3.30076249319665e-47, 7.69574054488415e-24, Inf, NaN, -2.73128308680604e+126, 7.04770681659135e-119, -8.70419004886074e-200, -3.29073095521994e-118, 4.53742166926922e+27, 1.83022226777067e-288, 7.09880286895475e+239, -1.80471011938495e-217, -987689888031272, -3.35262492003067e+233, -7.52334729366899e-175, 4.90457643113392e-204, -1.73242535028081e-255, 1.89045627153742e-83, 4.62993284519814e+141, -2.96832121510248e+248, 2.26228628103453e-308, -1.28462879892518e+49, 4.45231659910143e+103, -2.17954322173227e-274, -2.8037364869221e-33, 2.75942888158733e-307, -6.26090049991747e+56, 0.000336919605581402, -5.29721002733514e-305, -4.18413394321102e-91, 3.65700452771446e+41, 2.4173207762824e-265, -3.04439602961377e-172, -6.07482970854101e-96, 1.02115779901467e-61, -1.60520562931653e+131, 9.32367420976005e+86, 0), poly_y = c(5.61680736417283e+76, -2.40946879114043, 8.35702861817218e-106, NaN, -2.37346002276272e-55, -Inf, -Inf, -4.70818414220532e+135, -1.98179933013598e-297, -2.8596606276986e+126, -2.69791479876656e+64, -6.06870267837955e-183, -4.62523063177022e-11, 1.30378100053724e-58, 2.06226197337801e-294, -1.2859601668122e-36, 1.35747444673436e+230, -1.08517278778407e+21, 0), x = c(1.27890654606226e-188, 7527485546020.59, -2.14488209182332e+105, Inf, -2.02048162434253e-44, NaN, 3.42032101584627e-93, 8.27932373953685e-269, -4.36408839884835e-38, Inf, 0), y = c(6.47599652406816e+188, -1.5600959424723e+246, -7.50585834614888e+284, -9.27444379465874e+240, 9.49004278472289e+222, -2.74091669569808e+256, -6.06628630504608e-44, -0.00101940368673233, 3.06107636871548e+238, 6.55275385389841e-240, -1.48399874396118e+47, 9.16904933188939e-35, -2.07467736400536e-284, 6.94131478577824e+164, -5.5967216936932e-168, -3.58047314657879e-10, 4.92682010218359e-88, -1.11188922097758e-72, 1.3976614997431e-176, -1.46673586226245e+64, 1.54710493323576e-298, 6.01409586841658e+221, 8.84504292234847e-195, 1.58469253118779e+132, -4.87411146232111e+199, -6.57814475580888e-121, -3.95540666931765e-64, -Inf, NaN, 2.76504354121682e-247, 1.73449647887861e-218, -7.99673422465593e+32, -2.65451953001246e-24, 2.90992270379842e-226, 1.59363195528273e-85, Inf, 3.57163680144006e+306, -708033289221.513, 2.70556548924223e-169, 1.94564217794711e-174, 2.16961927502633e-222, 2.86187280622422e+259, -1.70099699382665e-276, 5.99249482420488e+109, -6.87851197370956e+103, -4.04479138133641e+229, 1.15534477548193e+107, 5.71273754056285e-194, 2.01701324239408e+253, -3.11231333158067e-229, -Inf, -2.19771425923763e-185, 9.33597072267938e-293, 7.34305010414498e-165, -1.04191463999044e-193, 2.15177012013628e+165, -6.94313509841751e-208, 0)) result <- do.call(ProFound:::point_in_polygon,testlist) str(result)