Update search.R