[R] Arguments to "personalised" plot()

(Ted Harding) Ted.Harding at manchester.ac.uk
Sun Oct 7 23:48:07 CEST 2007


On 07-Oct-07 21:01:08, Deepayan Sarkar wrote:
> On 10/7/07, Ted Harding <Ted.Harding at manchester.ac.uk> wrote:
>> Hi Folks,
>>
>> I'm curious for an explanation of the following -- it's a
>> matter of trying to understand how R parses it.
>>
>> I've written sundry little "helper" variants of functions,
>> in particular plot(), to save repetitively typing the same
>> options over and over again.
>>
>> For example:
>>
>> plotb <- function(x,...){plot(x,pch="+",col="blue",...)}
>>
>> This does exactly what you'd expect it to do when fed with
>> a vector of values to plot, e.g.
>>
>>   plotb(cos(0.01*2*pi*(0:100)))
>>
>> namely a plot of the values of cos(..) with x-coordinates
>> marked 0, 20, 40, 60, 80, 100, as blue "+".
>>
>> As expected, one can add other plot options if needed, e.g.
>>
>>   plotb(cos(0.01*2*pi*(0:100)), xlim=c(0,4*pi))
>>
>> if one wants. In this case, I'm supposing that the "xlim=c(0,4*pi)"
>> goes in under the umbrella of "...", which is what I guessed
>> would happen.
>>
>> Interestingly, though, if I do
>>
>>   x<-0.01*2*pi*(0:100); plotb(x,cos(x))
>>
>> I now get it with the x-axis labelled 0,1,2,3,4,5,6 just as
>> if I had used the built-in
>>
>>   x<-0.01*2*pi*(0:100); plot(x,cos(x),pch="+",col="blue")
>>
>> and I can *also* add "xlim=c(0,4*pi)":
>>
>>   x<-0.01*2*pi*(0:100); plotb(x,cos(x),xlim=c(0,4*pi))
>>
>> and it still works! Now the latter is the same "..." mechanism
>> as before, I suppose; but this doesn't explain how plotb()
>> "sees" x, along with cos(x), and picks it up to do the
>> right thing.
>>
>> So my question -- which is why I'm posting -- is:
>>
>> How does "x" get in along with "cos(x)" when I do
>> "plotb(x,cos(x))", when the definition of the function is
>>
>>   plotb <- function(x,...){plot(x,pch="+",col="blue",...)}
> 
> I'm not sure exactly which part you didn't expect. Given this
> definition of plotb, I would expect
> 
> plotb(x,cos(x))
> 
> to expand to
> 
> plot(x, pch="+", col="blue", cos(x))
[A]

> and as far as I can tell, these give identical results. Is that what
> surprises you? Why?

See below.

> The other possibility is that you are surprised by the behavior of
> 
> plot(x, pch="+", col="blue", cos(x))
[B]
> 
> Remember that named arguments trump positional matching,

Ahh, thank you!! I think this is the clue I was looking for.
I had guessed that [A](above) and therefore [B] was what was
really happening, and that therefore some sort of precedence
was working to ensure that things came in in the right "order".
Now I know what it is.

> and consequently, this is equivalent to
> 
> plot(x, cos(x), pch="+", col="blue")

In the sense, I suppose, that in either case the effect is
a) First sort out (*,pch="+",col="blue",*) (since these are
named), leaving (x,                       cos(x))

(as it were).

> -Deepayan

Thanks, Deepayan.
Ted.

--------------------------------------------------------------------
E-Mail: (Ted Harding) <Ted.Harding at manchester.ac.uk>
Fax-to-email: +44 (0)870 094 0861
Date: 07-Oct-07                                       Time: 22:48:05
------------------------------ XFMail ------------------------------



More information about the R-help mailing list