testlist <- list(ahat = c(-4.11367928127064e+80, NaN, 2.79007508688443e+291, -Inf, 1.13722118274863e+165, 1.24928798805976e+186, -9.06013680652417e-190, 1.2437247084887e-163, 1.07356550066254e-51, -6.72069897320444e-236, 3.93269171816182e-254, -3.45570679530885e+99, 8.95779391235146e+89, -1.04429299113846e+114, 2.77225047393114e+43, -2.18557342377325e+139, -2.63807973264429e-55, -1.77673745822268e-44, -4.56102322476811e+108, 6.84063888777112e+216, 5.05107442166784e+120, -5.78936242882356e+93, 6.89413922929099e+47, 2.44539086808659e-86, 1.0935372876868e-207, 1.38724699981922e-134, 1.55249224640844e+275, 2.49737557651846e+56, -2.19682221648575e+60, -4.87441133829026e-213, -1.99602424960686e-140, -4.69938528249398e-20, -1.11592839355046e+170, 1.8280291119252e+153, 3.12841809088519e+187, -2.39682777361913e-245, -4.72787498060106e-172, -3.60393983438945e+41, 3.78788841954875e-243, 1.83256593058178e+116, -4.42593797887469e+160, 3.21759483180466e+40, 3.48325048456177e-264, 1.12041057083754e-122, -5.49906372405249e+23, -5.57063900296426e-183, 6.77668219319993e+126, 2.64895456424581e-139, 1.31811147361447e+39, 1.87979699345068e-221, -6.70939165604135e-151, 5.48689750973174e+38, 1.31455194046167e-288, 7.17786009835887e-77, 3.11404119754965e+159, 2.25842022200925e+27, -4.16598764013351e+69, 8.52222037375526e-255, -3.63793901562505e+124, 1.26698551129027e+289, -2.21209417801963e+287, -2.94685897421173e+143, -3.85941897072093e+192, -3.19722805759127e+172, -1.0034474420466e+304, 4.02346764675613e-135, 1.07531427679841e+242, -9.29177057923572e+274, -1.70270940562957e-87, -1.01234684237682e-219, 3.43630400606225e-270, 510923.287272302, 3.51941825928212e+166, 1.22041141339004e+170, -4.56102322476811e+108, -4.01622413535557e+183, 1.66633417502333e-279, -1.66036751626169e+30, -4.76889881443584e-91, -1.86036624963322e+269, 1.63569764505322e+203, -7.94838729553646e+111, -2.98404676523236e-201, 1.31120831873448e-197, -5.57968551902938e+116, 2.34826736750492e+206, -2.76200330647826e-182, NaN, 4.27593177915899e-50, 5.63564597328664e+75, 2.28466531881303e-104, 1.06800955318109e+83, 1.10729817624382e+184, NA, -5.53919239396422e-274, 0), section_counts = c(1057.01756798765, 7.70177621447493e+83, 3.50158733187928e-55, 1.77779094682472e-85, -4.99847120821911e-284, 1.18549285049245e-304, NaN, 5.13589388201367e-280, -1.05341479636601e+145, -4.4692982278735e-90, -2.11508664082511e+149, 1.47945321095712e-34, 7.01809347027828e+40, 2.80092171835314e+160, 1.19097488155705e+278, -5.1252430608359e-216, 1.44475687051266e-269, 2.42632830841032e-241, -1.75496233049964e+190, 1.01498536663675e-167, 6.22092900999083e-25, -4.53805521146284e-228, -Inf, 1.11610835647139e+77, -1.64257756325868e+50, -1.12595128580337e+138, -9.48055543999339e+109, 7.09552892228359e+210, -1.04373290519353e-177, -6.36431848857013e-130, -4.81897468620237e-211, -3.77442065486034e+261, -2.70242878465007e-269, 1.03300946378533e+182, 3.79997565953961e-135, 7.73574534708403e+21, -4.59699448598153e-187, 7.83368982998661e-298, 6.1875377052447e-81, 4.53116757120205e+257, 3.72188607644722e-217, -1.00427267792901e-70, -3.17826183470595e+75, -2.04797515325137e-307, 2.73641307832081e+77, 8.12122538121019e+160, -3.10614401122246e-149, 5.46808498426032e-127, -Inf, 6.94758015081657e-234, 3.22746501924252e+280, 4.65537625344994e+193, 4.06255178235913e+104, -1275459345.91252, 3.37680746845131e-142, -5.8756250857988e-69, 6.03220709982538e+294, -3.22754468326856e+248, 9.88569594190458e+139, -2.4956880902162e+184, -6.36446070601206e-150, NA, -5.23795971022895e-297, 1.28948334979827e+38, -1.23890557871084e+95, 0), student_counts = structure(c(NA, 7.38604592301033e-77, 1.04890317586969e-239, 1.0751355804854e-248, 3.41666750641836e+248, 1.42050538191e-295, 6.11182087737199e+185, 50839312816.7054, 5.87058934776384e-202, NA, 5.45392106581701e-154, 8.3564896794104e-72, 8.17727455349078e+30, 1.37276977453768e+104, 2.57160023900651e+181, 1.6733373475403e-12, 2.33198645148093e-141, 4.20261968636881e+64, 1.31649218208095e-288, 4.75288310040198e-173, 7.2765164519369e-87, 1.48987053342105e-190, 1.5070682520826e-161, 1.19624780686979e-05, -Inf, Inf, 4.69528285092364e-94, 3.88055301890848e-302, 2.66676777863183e-182, 2.87751672172759e-120, 5.43792305666985e+280, 9.41720261969655e-98, 34005161.4073781, 6.20030799607577e+149, 5.74822598608421e-280), .Dim = c(7L, 5L ))) result <- do.call(rlme:::rhoschC,testlist) str(result)