How to plot nomograms in R for Naive Bayes classifier




Shown above is a nomogram from a Naive Bayes classifier from a tool called Orange.
I wanted to know how do I implement something like this in R?
Though R has a package called rms for this,it is used only for linear regression.
Can somebody please help me with this??