Filtering Out Specific Rows: Extracting the First Row of Each Subject ID with dplyr and Base R