Displaying 4 results from an estimated 4 matches for "do_nextmethod".
2001 Dec 11
4
crash bug in get("function.name")() (PR#1211)
R : Copyright 2001, The R Development Core Team
Version 1.3.1 (2001-08-31)
> tmp <- factor(1:3)
> get("print.factor")(tmp)
[1] 1 2 3
Levels: 1 2 3
> print.a <- function(x,...) {
+ print("this is a")
+ NextMethod("print", x, quote = FALSE, right = TRUE, ...)
+ }
>
> get("print.a")
function(x,...) {
print("this is a")
1998 May 15
1
couldn't find function "print.tframe"
I have an object with an attribute "tframe" for which there is a generic method
print.tframe and also a method print.tframe.default defined in a library.
However, when I use attributes(object) I get the message
$tframe
Error: couldn't find function "print.tframe"
It's as if <primitive: attributes> is not looking through the search list?
Any suggestions?
2005 May 04
1
help track a segmentation fault
I have an R script that I run using
nohup R CMD BATCH r.in r.out &
The code loops through data from the database and takes hours. The
problem is, in about an hour and a half after I start the script the
program stops and I get
/usr/lib/R/bin/BATCH: line 55: 14067 Done ( echo
"invisible(options(echo = TRUE))"; cat ${in}; echo "proc.time()" )
14068
2006 Apr 14
3
The object argument of NextMethod.
My question is when the object argument of NexthMethod be used?
In the following example, weather object argument is used will not
affects the result.
###
foo=function(x) {UseMethod("foo")}
foo.cls1=function(x)
{
x=x+1;class(x)<-"ncls"
NextMethod()
}
foo.ncls=function(x)
{
cat("ncls\n")
}
foo.cls2=function(x)
{
cat("cls2\n");print(x)
}