R/lsclass.R

In cgwtools: Miscellaneous Tools

Defines functions lsclass

Documented in lsclass

lsclass <-
function(type='numeric'){
	inlist<-ls(.GlobalEnv)
	classlist <- sapply(1:length(inlist),function(j) class(get(inlist[j])) )
	tnams<-sapply(1:length(inlist), function(j)type %in% classlist[[j]] )
	return(inlist[tnams])
}

Try the cgwtools package in your browser