gmane.comp.lang.r.general.mbox

来自「R-Project是一个开源的统计软件,专门有一个R语言,类似S语言,这个包里面」· MBOX 代码 · 共 1,572 行 · 第 1/5 页

  Bob Muenchen (pronounced Min'-chen), Manager  
  Statistical Consulting Center
  U of TN Office of Information Technology
  200 Stokely Management Center, Knoxville, TN 37996-0520
  Voice: [phone]  
  FAX:   [phone]
  Email: [e-mail]
  Web:   http://oit.utk.edu/scc, 
  News:  http://listserv.utk.edu/archives/statnews.html

______________________________________________
[e-mail] 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.



From [e-mail] Tue Mar 04 03:33:20 2003
From: RMan54 <[e-mail]>
Subject: xyplot: legend title + legend on 1 line
Date: Fri, 15 Dec 2006 12:41:06 -0800 (PST)
Lines: 23
Message-ID: <[e-mail]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
X-From: [e-mail] Fri Dec 15 21:42:16 2006
Return-path: <[e-mail]>
Envelope-to: [e-mail]
Received: from hypatia.math.ethz.ch ([129.132.145.15])
	by dough.gmane.org with esmtp (Exim 4.50)
	id 1GvJsk-00056a-Rb
	for [e-mail]; Fri, 15 Dec 2006 21:42:14 +0100
Received: from hypatia.math.ethz.ch (hypatia [129.132.145.15])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFKfMRG017955;
	Fri, 15 Dec 2006 21:41:32 +0100
X-Spam-Checker-Version: SpamAssassin 3.1.7 (2006-10-05) on hypatia.math.ethz.ch
X-Spam-Level: 
X-Spam-Status: No, score=-0.1 required=5.0 tests=AWL, BAYES_50,
	SPF_HELO_PASS autolearn=no version=3.1.7
Received: from talk.nabble.com (www.nabble.com [72.21.53.35])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFKf77Q017908
	(version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NO)
	for <[e-mail]>; Fri, 15 Dec 2006 21:41:08 +0100
Received: from [72.21.53.38] (helo=jubjub.nabble.com)
	by talk.nabble.com with esmtp (Exim 4.50) id 1GvJre-0002LX-V9
	for [e-mail]; Fri, 15 Dec 2006 12:41:06 -0800
To: [e-mail]
X-Nabble-From: [e-mail]
X-Virus-Scanned: by amavisd-new at stat.math.ethz.ch
X-BeenThere: [e-mail]
X-Mailman-Version: 2.1.9
Precedence: list
List-Id: "Main R Mailing List: Primary help" <r-help.stat.math.ethz.ch>
List-Unsubscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>,
	<mailto:[e-mail]?subject=unsubscribe>
List-Archive: <https://stat.ethz.ch/pipermail/r-help>
List-Post: <mailto:[e-mail]>
List-Help: <mailto:[e-mail]?subject=help>
List-Subscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>,
	<mailto:[e-mail]?subject=subscribe>
Sender: [e-mail]
Errors-To: [e-mail]
Archived-At: <http://permalink.gmane.org/gmane.comp.lang.r.general/75843>


Does anybody know how in xyplot to put the legend title on one line with the
legend? I can get the legend on one line with columns=... but the title is
always on top. I tried a custom key with key=... and text=... but I can't
put the title text in front of the plotting symbol.

I am looking for the following layout of the legend, on one line:

"Legend Title:" + plot symbol1 + legend text1 + plot symbol2 + legend text2
+ ...

Thanks. Rene
 
-- 
View this message in context: http://www.nabble.com/xyplot%3A-legend-title-%2B-legend-on-1-line-tf2829327.html#a7898800
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
[e-mail] 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.



From [e-mail] Tue Mar 04 03:33:20 2003
From: "Deepayan Sarkar" <[e-mail]>
Subject: Re: xyplot: legend title + legend on 1 line
Date: Fri, 15 Dec 2006 13:01:56 -0800
Lines: 38
Message-ID: <[e-mail]>
References: <[e-mail]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Cc: [e-mail]
X-From: [e-mail] Fri Dec 15 22:08:43 2006
Return-path: <[e-mail]>
Envelope-to: [e-mail]
Received: from hypatia.math.ethz.ch ([129.132.145.15])
	by ciao.gmane.org with esmtp (Exim 4.43)
	id 1GvKI0-0007IB-QX
	for [e-mail]; Fri, 15 Dec 2006 22:08:21 +0100
Received: from hypatia.math.ethz.ch (hypatia [129.132.145.15])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFL26L6025290;
	Fri, 15 Dec 2006 22:02:28 +0100
X-Spam-Checker-Version: SpamAssassin 3.1.7 (2006-10-05) on hypatia.math.ethz.ch
X-Spam-Level: 
X-Spam-Status: No, score=-0.6 required=5.0 tests=AWL,
	BAYES_50 autolearn=no version=3.1.7
Received: from nz-out-0506.google.com (nz-out-0506.google.com [64.233.162.238])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFL1vZY025218
	for <[e-mail]>; Fri, 15 Dec 2006 22:01:58 +0100
Received: by nz-out-0506.google.com with SMTP id i11so464706nzh
	for <[e-mail]>; Fri, 15 Dec 2006 13:01:57 -0800 (PST)
Received: by 10.64.10.2 with SMTP id 2mr1758743qbj.1166216516836;
	Fri, 15 Dec 2006 13:01:56 -0800 (PST)
Received: by 10.65.97.6 with HTTP; Fri, 15 Dec 2006 13:01:56 -0800 (PST)
To: RMan54 <[e-mail]>
In-Reply-To: <[e-mail]>
Content-Disposition: inline
X-Virus-Scanned: by amavisd-new at stat.math.ethz.ch
X-BeenThere: [e-mail]
X-Mailman-Version: 2.1.9
Precedence: list
List-Id: "Main R Mailing List: Primary help" <r-help.stat.math.ethz.ch>
List-Unsubscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>,
	<mailto:[e-mail]?subject=unsubscribe>
List-Archive: <https://stat.ethz.ch/pipermail/r-help>
List-Post: <mailto:[e-mail]>
List-Help: <mailto:[e-mail]?subject=help>
List-Subscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>,
	<mailto:[e-mail]?subject=subscribe>
Sender: [e-mail]
Errors-To: [e-mail]
Archived-At: <http://permalink.gmane.org/gmane.comp.lang.r.general/75844>

On 12/15/06, RMan54 <[e-mail]> wrote:
>
> Does anybody know how in xyplot to put the legend title on one line with the
> legend? I can get the legend on one line with columns=... but the title is
> always on top. I tried a custom key with key=... and text=... but I can't
> put the title text in front of the plotting symbol.
>
> I am looking for the following layout of the legend, on one line:
>
> "Legend Title:" + plot symbol1 + legend text1 + plot symbol2 + legend text2
> + ...

You can create a grob (grid object) representing this legend, or a
function that produces such a grob, and pass it to xyplot through the
'legend' argument (see ?xyplot). The 'key' argument essentially
controls one such built-in function, namely 'draw.key', which does not
support such legends.

Note however, that column types can be repeated in key, so you might
be able to fake such a legend. E.g.:


xyplot(1 ~ 1,
       key =
       list(text = list("title: ", font = 2),
            points = list(pch = 1),
            text = list("1"),
            points = list(pch = 2),
            text = list("2")))

-Deepayan

______________________________________________
[e-mail] 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.



From [e-mail] Tue Mar 04 03:33:20 2003
From: RMan54 <[e-mail]>
Subject: xyplot: logarithmic y-axis
Date: Fri, 15 Dec 2006 14:12:22 -0800 (PST)
Lines: 46
Message-ID: <[e-mail]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
X-From: [e-mail] Fri Dec 15 23:13:53 2006
Return-path: <[e-mail]>
Envelope-to: [e-mail]
Received: from hypatia.math.ethz.ch ([129.132.145.15])
	by dough.gmane.org with esmtp (Exim 4.50)
	id 1GvLJM-0000QA-5e
	for [e-mail]; Fri, 15 Dec 2006 23:13:48 +0100
Received: from hypatia.math.ethz.ch (hypatia [129.132.145.15])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFMCY1R013097;
	Fri, 15 Dec 2006 23:13:09 +0100
X-Spam-Checker-Version: SpamAssassin 3.1.7 (2006-10-05) on hypatia.math.ethz.ch
X-Spam-Level: 
X-Spam-Status: No, score=-0.0 required=5.0 tests=AWL, BAYES_50,
	SPF_HELO_PASS autolearn=no version=3.1.7
Received: from talk.nabble.com (www.nabble.com [72.21.53.35])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFMCOQh013029
	(version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NO)
	for <[e-mail]>; Fri, 15 Dec 2006 23:12:26 +0100
Received: from [72.21.53.38] (helo=jubjub.nabble.com)
	by talk.nabble.com with esmtp (Exim 4.50) id 1GvLHy-00065q-7B
	for [e-mail]; Fri, 15 Dec 2006 14:12:22 -0800
To: [e-mail]
X-Nabble-From: [e-mail]
X-Virus-Scanned: by amavisd-new at stat.math.ethz.ch
X-BeenThere: [e-mail]
X-Mailman-Version: 2.1.9
Precedence: list
List-Id: "Main R Mailing List: Primary help" <r-help.stat.math.ethz.ch>
List-Unsubscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>,
	<mailto:[e-mail]?subject=unsubscribe>
List-Archive: <https://stat.ethz.ch/pipermail/r-help>
List-Post: <mailto:[e-mail]>
List-Help: <mailto:[e-mail]?subject=help>
List-Subscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>,
	<mailto:[e-mail]?subject=subscribe>
Sender: [e-mail]
Errors-To: [e-mail]
Archived-At: <http://permalink.gmane.org/gmane.comp.lang.r.general/75845>


This should be simple but I am struggling. I like to easily switch in xyplot
between a linear or logarithmic y-axis by setting a logical flag logY to
False or True. This switch changes the scales argument of xyplot. I found
out that the original two-dimentional data (Conc vs Time in my case) are
converted to log10(Conc) if log=TRUE in scales, but it appears that
functions like panel.curve need to provide the y values in log10 form (if
there is an automatic method, I would like to know). I therefore like to
pass on the value logY to my custom panel.curve function. How do I do that?
I think that the value of logY should go into xyplot that should pass it on
to the panel function and then to the panel.curve function.

Thanks, -Rene

logY=TRUE

# Custom panel.curve function
myCurve <-function(x, log) {
    f <- ...   #  calculate curve here
    if (log==TRUE) f <- log10(f)
    return(f)
}

xyplot(Conc ~ Time | Subj,
       groups=Dose,
       data = mydata,
       as.table=TRUE,
       scales=list(y=list(log=logY)),
       panel = function(...) {
           panel.abline(h=c(0, 50, 100, 150, 200, 250) ,
                      v=c(0,24,48,72,96), col.line="gray")
           panel.xyplot(...)
           panel.curve(myCurve, from=0, to=96, n=300))
           }
       )

-- 
View this message in context: http://www.nabble.com/xyplot%3A-logarithmic-y-axis-tf2829755.html#a7900202
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
[e-mail] 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.



From [e-mail] Tue Mar 04 03:33:20 2003
From: "Deepayan Sarkar" <[e-mail]>
Subject: Re: xyplot: logarithmic y-axis
Date: Fri, 15 Dec 2006 14:26:47 -0800
Lines: 23
Message-ID: <[e-mail]>
References: <[e-mail]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Cc: [e-mail]
X-From: [e-mail] Fri Dec 15 23:27:39 2006
Return-path: <[e-mail]>
Envelope-to: [e-mail]
Received: from hypatia.math.ethz.ch ([129.132.145.15])
	by dough.gmane.org with esmtp (Exim 4.50)
	id 1GvLWb-0002EO-Q3
	for [e-mail]; Fri, 15 Dec 2006 23:27:29 +0100
Received: from hypatia.math.ethz.ch (hypatia [129.132.145.15])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFMQsmb017293;
	Fri, 15 Dec 2006 23:27:11 +0100
X-Spam-Checker-Version: SpamAssassin 3.1.7 (2006-10-05) on hypatia.math.ethz.ch
X-Spam-Level: 
X-Spam-Status: No, score=-0.6 required=5.0 tests=AWL,
	BAYES_50 autolearn=no version=3.1.7
Received: from py-out-1112.google.com (py-out-1112.google.com [64.233.166.178])
	by hypatia.math.ethz.ch (8.13.6/8.13.6) with ESMTP id kBFMQl01017253
	for <[e-mail]>; Fri, 15 Dec 2006 23:26:48 +0100
Received: by py-out-1112.google.com with SMTP id a25so595617pyi
	for <[e-mail]>; Fri, 15 Dec 2006 14:26:47 -0800 (PST)
Received: by 10.65.188.20 with SMTP id q20mr1868166qbp.1166221607119;
	Fri, 15 Dec 2006 14:26:47 -0800 (PST)
Received: by 10.65.97.6 with HTTP; Fri, 15 Dec 2006 14:26:47 -0800 (PST)
To: RMan54 <[e-mail]>
In-Reply-To: <[e-mail]>
Content-Disposition: inline