Try this:

ls.str(mode = 'function')

On Sat, Dec 18, 2010 at 2:39 PM, Carl Witthoft <carl@witthoft.com> wrote:

> Oddly enough, I posted my little cutie recently:
>
>
> lstype<-function(type='closure'){
> #
>
>        inlist<-ls(.GlobalEnv)
>        if (type=='function') type <-'closure'
>        typelist<-sapply(sapply(inlist,get),typeof)
>        return(names(typelist[typelist==type]))
> }
>
>
> And, not useful for functions, but to find the size of a pile of data
> objects,
>
> thefloats<-lstype('numeric')
> sapply(sapply(sapply(sapply(thefloats,get),unlist),as.vector),length)
>
> ______________________________________________
> 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.
>



-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O

	[[alternative HTML version deleted]]

