[R] stupid R tricks

[Carl Witthoft]

Hi all,
Just thought I'd post this (maybe) helpful tool I wrote.  For people 
like me who are bad at keeping a clean environment, it's a time-saver.

#simple command to get only one type of object in current environment
lstype<-function(type='closure'){
	inlist<-ls(.GlobalEnv)
	if (type=='function') type <-'closure'
	typelist<-sapply(sapply(inlist,get),typeof)
	return(names(typelist[typelist==type]))
}



Carl