Old-style nomograms can also be created using R:
> mydf = bwdf(F)
> dd = datadist(mydf) ; options(datadist='dd')
> mod = ols(bwt~age+lwt+race+smoke+ptl+ht+ui+ftv, mydf)
To determine the outcome (bwt in this case), points (top scale) from each predictor are added. The value in 'Linear Predictor' scale that corresponds to total points (scales in lower part of graph) gives the predicted outcome value.
Frank E Harrell Jr (2015). rms: Regression Modeling Strategies. R package version 4.3-1.