R: Evaluate precision and recall for get_spouse