# NOT RUN {
# First introduce the left shape function of L fuzzy number
Left.fun = function(x) { (1-x^2)*(x>=0)}
A = L(20, 12, 10)
LRFN.plot(A, xlim=c(0,60), col=2, lwd=2)
## The function is currently defined as
function (m, m_l, m_r)
{
c(m, m_l, m_r, 0.5)
}
# }
Run the code above in your browser using DataLab