names(lapply(.GlobalEnv, function(x) inherits(x, "ucr")))
HTH,
Josh
On Wed, Oct 12, 2011 at 12:46 AM, Erin Hodgess <erinm.hodg...@gmail.com> wrote:
> Dear R People:
>
> Here is a really goofy question.
>
> I have some objects which have 2 classes: data.frame and ucr.
>
> Also, the classes will always be in that order.
>
> I have tried all sorts of things, but to no avail.
>
> listucrModels <- function(envir=.GlobalEnv, ...) {
> objects <- ls(envir=envir, ...)
> if (length(objects) == 0) NULL
> else objects[sapply(objects,
> function(.x) "ucr"==
> (class(eval(parse(text=.x), envir=envir))[2]))]
> }
>
>> listucrModels()
> [1] NA NA NA NA NA NA NA NA
> [9] NA NA NA NA NA "jan.df" NA NA
> [17] NA NA NA NA NA NA NA NA
> [25] NA NA NA NA NA NA NA NA
>>
> Since most of them do not have the second class attribute.
>
> How do I get rid of the NA's and just get a list, please?
>
> Thanks,
> Erin
>
>
>
>
> --
> Erin Hodgess
> Associate Professor
> Department of Computer and Mathematical Sciences
> University of Houston - Downtown
> mailto: erinm.hodg...@gmail.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.
>
--
Joshua Wiley
Ph.D. Student, Health Psychology
Programmer Analyst II, ATS Statistical Consulting Group
University of California, Los Angeles
https://joshuawiley.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.
