On Sat, 2009-05-09 at 20:50 +0200, Carlos J. Gil Bellosta wrote:
> Hello,
>
> I am building a package that creates a new kind of object not unlike a
> dataframe. However, it is not an extension of a dataframe, as the data
> themselves reside elsewhere. It only contains "metadata".
>
> I would like to be able to retrieve data from my objects such as the
> number of rows, the number of columns, the colnames, etc.
>
> I --quite naively-- thought that ncol, nrow, colnames, etc. would be
> dispatched, so I would only need to create a, say, ncol.myclassname
> function so as to be able to invoke "ncol" directly and transparently.
>
> However, it is not the case. The only alternative I can think about is
> to create decorated versions of ncol, nrow, etc. to avoid naming
> conflicts. But I would still prefer my package users to be able to use
> the undecorated function names.
>
> Do I have a chance?
Yes, if I understand you correctly. nrow, ncol are not S3 generics. You
can make them generic in your package and assign to the default method
the function definition in the R base package. For example:
ncol <- function(object, ...) UseMethod("ncol")
ncol.default <- base::ncol
mat <- matrix(0, ncol = 10, nrow = 5)
class(mat) <- "myclass"
ncol.myclass <- function(object, ...) {
## as example, perversely, swap rows and cols
dim(object)[1]
## but your code would go in here
}
ncol(mat)
This is covered in the Writing R Extensions manual, section 7.1
http://cran.r-project.org/doc/manuals/R-exts.html#Adding-new-generics
Also, this is probably not the right list for such questions. R-Devel
would have been more appropriate.
HTH
G
>
> Best regards,
>
> Carlos J. Gil Bellosta
> http://www.datanalytics.com
>
> ______________________________________________
> R-help@r-project.org 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.
--
%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%
Dr. Gavin Simpson [t] +44 (0)20 7679 0522
ECRC, UCL Geography, [f] +44 (0)20 7679 0565
Pearson Building, [e] gavin.simpsonATNOSPAMucl.ac.uk
Gower Street, London [w] http://www.ucl.ac.uk/~ucfagls/
UK. WC1E 6BT. [w] http://www.freshwaters.org.uk
%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%
______________________________________________
R-help@r-project.org 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.
