# Normal grey curve with an adjustment of 3, an upper limit of 0.8, and
# weighted towards smaller values.
greycurve()
if (FALSE) {
# 1:1 relationship grey curve.
greycurve(gadj=1, glim=1:0)
# Grey curve weighted towards larger values.
greycurve(gweight=2)
# Same as the first, but the limit is 1.
greycurve(glim=1:0)
# Setting the lower limit to 0.1 and weighting towards larger values.
greycurve(glim=c(0.1,0.8), gweight=2)
}
Run the code above in your browser using DataLab