remove all variables except functions

Question

I have loaded in a R console different type of objects. I can remove them all using

rm(list=ls())

or remove only the functions (but not the

Answer 1

The posted setdiff answer is nice. I just thought I'd post this related function I wrote a while back. Its usefulness is up to the reader :-).

lstype<-function(type='closure'){ 
    inlist<-ls(.GlobalEnv)
    if (type=='function') type <-'closure'
    typelist<-sapply(sapply(inlist,get),typeof)
    return(names(typelist[typelist==type]))
}