If you type Roger(binomial(n-k,k),k,n,20,40);, you would get

                         .61803398874989484820, 1.0314



          If you type Roger(binomial(n,k)*binomial(n+k,k),k,n,20,40);

                                 You would get:

                         .34657359027997265471, .32986



         If you type Roger(binomial(n,k)^2*binomial(n+k,k),k,n,20,40);

                                 You would get:

                         .32898681336964528729, .14382



        If you type Roger(binomial(n,k)^2*binomial(n+k,k)^2,k,n,20,40);

                                 You would get:

                         .20034281719326571423, .16755



          If you type Roger(binomial(n,k)^5,k,n,12,30);, you would get

                            .0236602436856, -.82293