powered by
legendre.weight(x)
x <- seq( -2, 2, .01 ) y <- legendre.weight( x )
Run the code above in your browser using DataLab