RE: [Rd] Should NEVER happen; please bug.report() [mkCLOSXP] (PR#7535)

From: McGehee, Robert <Robert.McGehee_at_geodecapital.com>
Date: Wed 19 Jan 2005 - 12:57:55 EST


... which is equivalent to this:
as.function(list(function(x){}))

which doesn't really make sense (and is the same as part #2 of bug 7495 reported earlier anyway).

Jeroen, notice that w_R.fc[2] is a list containing a function, and not the function itself. Not sure what this construct is good for, but if you want to make lists of functions, use "[[" to index the list.

Also, I think the R patch may be as easy as adding the line

stopifnot(is(x[[1]], "language"))

to the as.function(x, ...) code

--Robert

-----Original Message-----
From: jjvanhoutte@ucdavis.edu [mailto:jjvanhoutte@ucdavis.edu] Sent: Tuesday, January 18, 2005 8:25 PM
To: r-devel@stat.math.ethz.ch
Cc: R-bugs@biostat.ku.dk
Subject: [Rd] Should NEVER happen; please bug.report() [mkCLOSXP] (PR#7535)

I'm probably not using the function right, but anyway, the program said: "please bug.report."

> w_R.f1=function(PR,Pc) return (Pc*PR^3)
>
> w_R.f2=function(PR,Pc) return (Pc*PR)
>
> w_R.fc=c(w_R.f1,w_R.f2)
> w_R.fc[2]
[[1]]
function(PR,Pc) return (Pc*PR)

>
> RSD(type=3,

+ gparP=gpar(col="red"),
+ gparD=gpar(fill=FALSE,col=FALSE),
+ gparL=gpar(col="red",lwd=2),
+ gparSL=gpar(col=grey(0.5),lwd=2),
+ gparS=gpar(fill=FALSE,col=FALSE),
+ gparSP=gpar(col=grey(0.7)),
+ w_R.f=w_R.fc[2]
+ )

Error in R2SDgraph(...) : couldn't find function "w_R.f"
> as.function(w_R.fc[2])
Error in as.function.default(w_R.fc[2]) : invalid body argument for "function"
Should NEVER happen; please bug.report() [mkCLOSXP]

--please do not edit the information below--

Version:
 platform = i386-pc-mingw32
 arch = i386
 os = mingw32
 system = i386, mingw32
 status =
 major = 2
 minor = 0.1
 year = 2004
 month = 11
 day = 15
 language = R

Windows XP Home Edition (build 2600) Service Pack 2.0

Search Path:
 .GlobalEnv, package:grid, package:methods, package:stats,

package:graphics,
package:grDevices, package:utils, package:datasets, Autoloads,
package:base

Respectfully,
Jeroen



R-devel@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

R-devel@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel Received on Wed Jan 19 12:11:28 2005

This archive was generated by hypermail 2.1.8 : Fri 18 Mar 2005 - 09:02:37 EST