# [R] probability scale at y axis

(Ted Harding) Ted.Harding at nessie.mcc.ac.uk
Wed Oct 20 22:55:52 CEST 2004

```Now that I think of it:

qqplot(x,qnorm(0.005+0.01*(0:99)),yaxt="n")
axis(2, at=qnorm(p), label=p, las=1)

Ted.

On 20-Oct-04 Ted Harding wrote:
> Well, I think he probably meant something more like
>
>  x <- sort(rnorm(100))
>  y<-0.5+(0:99)
>  p <- c(0.01, 0.05, 0.5, 0.95, 0.99)
>  plot(x,qnorm(y/100), yaxt="n")
>  axis(2, at=qnorm(p), label=p, las=1)
>
> (From your plot, Andy, I would have inferred that the data
> were not normal! However, I like the elegance of your uses
> of "plot" and "axis".)
>
> Best wishes,
> Ted.
>
> On 20-Oct-04 Liaw, Andy wrote:
>> Do you mean something like:
>>
>> y <- sort(rnorm(100))
>> plot(y, yaxt="n")
>> p <- c(0.01, 0.05, 0.5, 0.95, 0.99)
>> axis(2, at=qnorm(p), label=p, las=1)
>>
>> ??
>>
>> Andy
>>
>>> From: Antonio Olinto
>>>
>>> Hi,
>>>
>>> I'd like to make a plot with a probability scale at y axis,
>>> just like in the old
>>> probability paper.
>>>
>>> I couldn't find how make it in R. Thanks for any hint.
>>>
>>> Best regards,
>>>
>>> Antonio Olinto
>>>
>>>
>>>
>>> -------------------------------------------------
>>> WebMail Bignet - O seu provedor do litoral
>>> www.bignet.com.br
>>>
>>> ______________________________________________
>>> R-help at stat.math.ethz.ch mailing list
>>> https://stat.ethz.ch/mailman/listinfo/r-help
>>> http://www.R-project.org/posting-guide.html
>>>
>>>
>>
>> ______________________________________________
>> R-help at stat.math.ethz.ch mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> http://www.R-project.org/posting-guide.html
>
> --------------------------------------------------------------------
> E-Mail: (Ted Harding) <Ted.Harding at nessie.mcc.ac.uk>
> Fax-to-email: +44 (0)870 094 0861  [NB: New number!]
> Date: 20-Oct-04                                       Time: 20:40:34
> ------------------------------ XFMail ------------------------------

--------------------------------------------------------------------
E-Mail: (Ted Harding) <Ted.Harding at nessie.mcc.ac.uk>
Fax-to-email: +44 (0)870 094 0861  [NB: New number!]
Date: 20-Oct-04                                       Time: 21:55:52
------------------------------ XFMail ------------------------------

```