"Design" has been replaced with "rms"
R package "rms"  : Regression Modeling Strategies

nomogram(): Draw a Nomogram Representing a Regression Fit
nomogram(fit, ..., adj.to, lp=TRUE, lp.at=NULL,
fun=NULL, fun.at=NULL, fun.lp.at=NULL, funlabel="Predicted Value",
interact=NULL, intercept=1, conf.int=FALSE,
conf.lp=c("representative", "all", "none"),
est.all=TRUE, abbrev=FALSE, minlength=4, maxscale=100, nint=10,
vnames=c("labels","names"),
varname.label=TRUE, varname.label.sep="=",
omit=NULL, verbose=FALSE)

  http://cran.r-project.org/web/packages/rms/index.html