Optimizing Data Analysis with R: Simplified Self-Join Using `data.table`