Create text-search.r