R help - Aug 2010 - modify a nomogram

Hi,
I would like to emphasize ("zoom") the zone of a nomogram where the
probability are > 0.01
(nomogram built with nomogram, Design).
As a consequence, I don't need to draw the part of the "Total
points"
axis with score < 60 equivalent in my case to a linear predictor < 4.5

- As far as I know, this is not possible with the arguments of the function.
- Changing the code of the function is beyond my abilities
     -- can not even create a "nomo.f" function with the same body:
          body(nomo) <- expression({
          conf.lp <- match.arg(conf.lp) ..... rest of the function body
        this does not even work
     -- I am not sure to find the piece of code responsible for
defining the axis

nomogram(logistic.fit, fun = plogis, fun.at = c(seq(0.01,1,by=.2)),
lmgp=.2, lp = T,maxscale = 100,   total.sep.page = T )

Thanks
David

Update to the rms package which is the version now being actively 
supported.  New features will not be added to Design.  The nomogram 
function in rms separates the plotting into a plot method for easier 
understanding.  You can control all axes - some experimentation can 
tell you if you can do what you want as I haven't tried exactly what 
you are doing.

Frank

Frank E Harrell Jr   Professor and Chairman        School of Medicine
                      Department of Biostatistics   Vanderbilt University

On Wed, 25 Aug 2010, david dav wrote:
> Hi,
> I would like to emphasize ("zoom") the zone of a nomogram where
the
> probability are > 0.01
> (nomogram built with nomogram, Design).
> As a consequence, I don't need to draw the part of the "Total
points"
> axis with score < 60 equivalent in my case to a linear predictor <
4.5
>
> - As far as I know, this is not possible with the arguments of the
function.
> - Changing the code of the function is beyond my abilities
>     -- can not even create a "nomo.f" function with the same
body:
>          body(nomo) <- expression({
>          conf.lp <- match.arg(conf.lp) ..... rest of the function body
>        this does not even work
>     -- I am not sure to find the piece of code responsible for
> defining the axis
>
> nomogram(logistic.fit, fun = plogis, fun.at = c(seq(0.01,1,by=.2)),
> lmgp=.2, lp = T,maxscale = 100,   total.sep.page = T )
>
> Thanks
> David
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>