我需要从我的数据txt文件中提取“ MID”列，还从我的BahamaBucks txt文件中提取“ MID”列，以查看它们是否具有匹配的数字，但是我不确定该怎么做。我正在使用
BahamaBucks <-fread（“ ../ bahama bucks active MIDs.txt”，标头= TRUE，colClasses =“字符”）
数据<-fread（“ ../ 5041 Pull.txt”，标头= TRUE，colClasses =“字符”）
仅数据<-left_join（BahamaBucks，数据，通过=“ MID”）
全部<-left_join（BahamaBucks，Data，by =“ MID”）
write.table（all，“ ../all.txt”，sep =“ \ t”，row.names = FALSE，quote = FALSE）
write.table（DataOnly，“ ../DataOnly .txt”，sep =“ \ t”，引用= FALSE，row.names = FALSE）