आर सूचियों का छेड़छाड़

Question

मेरे पास 2 सूचियां हैं, प्रत्येक एकाधिक चर के साथ (मुझे लगता है कि यह सही शब्द है)। और मैं प्रत्येक चर के लिए चौराहे खोजना चाहता हूँ। नीचे उदाहरण देखें:

x<-list(A=c(1,2,3),B=c(4,5,6),C=c(7,8,9)) #input 
y<-list(A=c(1,3,6,7),B=c(5,7,8),C=c(7,9,10)) #input 
xinty<-list(A=c(1,3),B=5,C=c(7,8)) # desired output 

मैंने निम्नलिखित कोशिश की है, लेकिन यह स्पष्ट रूप से गलत है। किसी भी सुझाव के लिए बहुत आभार होगा। धन्यवाद।

xinty<-lapply(x,function(x) intersect(x,y)) 

Answer 1

के बारे में क्या:

mapply(intersect, x,y)