如何在新列中不留间隙地使用R中的粘贴?

FileNumber1<-as.factor(c("510-699880","510-699957","510-700077"))
FileNumber2<-as.integer(c(510712140,510712139,510712120))

df<-data.frame(FileNumber1,FileNumber2)

基本上,我想使FileNumber1与FileNumber2的格式相同,以便在以后的阶段进行比较。

library(tidyr)

df<-separate(df,FileNumber1,into=c('A','B'), sep="-")
df$FileNumber3<-paste(df$A,df$B)

当我运行上面的代码时,我得到以下结果

    A      B FileNumber2 FileNumber3
1 510 699880   510712140  510 699880
2 510 699957   510712139  510 699957
3 510 700077   510712120  510 700077

但是,我希望FileNumber3列与下面一样,没有间隙。我怎么得到这个?

FileNumber3
510699880
510699957
510700077