library(refnr)
formulas <- rbind(c(Name = "Length",
Formula = "Sepal.Length + Petal.Length"),
c(Name = "Width",
Formula = "Sepal.Width + Petal.Width"))
res <- refnr(iris, formulas)
Run the code above in your browser using DataLab