# NOT RUN {
###
### generate the inner products vector for the
### Gegenbauer polynomials of orders 0 to 10
### the polynomial parameter is 1.0
###
h <- gegenbauer.inner.products( 10, 1 )
print( h )
# }
Run the code above in your browser using DataLab