Update rOpenSearch.R