Text this: Identifying quality responses using an analysis of response times: the RTcutoff function in R