# h_test_1d works as expected

    list(est = 5.64356534807864, se = 0.66560934580673, df = 3.5, 
        t_stat = 8.47879523271798, p_val = 0.00187339012243507)

# h_test_md works as expected

    list(num_df = 2L, denom_df = 5, f_stat = 798.827755352408, p_val = 5.43656466194095e-07)