#mydata<-fillData()
## The function is currently defined as
function ()
{
mydata <- data.frame(X = numeric(0), Y = numeric(0), Weight = numeric(0))
mydata <- edit(mydata)
mydata <- mydata[order(mydata[1]), ]
return(mydata)
}
Run the code above in your browser using DataLab