added the searchcomcat.R file