library(EstimationTools)
#----------------------------------------------------------------------------
# Example: Uniform function
uniform_key(x=1, w=100)
curve(uniform_key(x, w=100), from=0, to=10, ylab='g(x)')
#----------------------------------------------------------------------------
Run the code above in your browser using DataLab