Merge 2 tables on R

#################################

##### Fusionner deux tables #####

#################################

dat <- read.table("Table.txt")

head(dat)

coord <- read.table("microsatcoord_PL + ML (Medit) 2.txt")

coord <- coord[,1:3]

head(coord)

# Fusion des tables

dfr <- cbind.data.frame(coord, dat)

head(dfr)

dfr2 <- dfr[,-1]

rownames(dfr2) <- dfr[,1]

head(dfr2)

?merge

test <- merge(dat, coord, by = "V1")

head(test)

write.table(test, "test.csv", sep=";", row.names=F, quote=F)