Is there a function in R for finding the intersection (per row) of a number of columns

Question

is there any good way i can generate the columns in the "desired Output" columns given X and Y different tags in the "human tags" and "ai tags"