* _join с пустым суффиксом

Question

Справедливое предупреждение: это может повесить вашу операционную систему.

*_join() из dplyr терпит неудачу, когда-либо из левых или правых суффиксов указаны как пустые (''), например,

inner_join(data.frame(x=1, y=2), 
      data.frame(x=1, y=3), 
      by='x', 
      suffix=c('', '.b')) 

Принимая во внимание следующие работы тонкодисперсных:

inner_join(data.frame(x=1, y=2), 
      data.frame(x=1, y=3), 
      by='x', 
      suffix=c('.a', '.b')) 

Между тем, S3 общий merge() (база) не имеет никаких проблем с пустыми суффиксов:

merge(data.frame(x=1, y=2), 
     data.frame(x=1, y=3), 
     by='x', 
     suffixes=c('', '.b')) 

dplyr Информация о пакете:

> packageVersion('dplyr') 
[1] ‘0.5.0’ 

R информация о версии:

> version 

platform  x86_64-w64-mingw32   
arch   x86_64      
os    mingw32      
system   x86_64, mingw32    
status          
major   3       
minor   3.0       
year   2016       
month   05       
day   03       
svn rev  70573      
language  R       
version.string R version 3.3.0 (2016-05-03) 
nickname  Supposedly Educational 

Answer 1

Это было весело, когда я наткнулся на эту ошибку. Нижеследующее достижения желаемого эффекта с помощью dplyr использования суффиксов '' и .b

library(dplyr) 
inner_join(data.frame(x=1, y=2), 
      data.frame(x=1, y=3), 
      by='x', 
      suffix=c('.a', '.b')) %>% 
    setNames(gsub('\\.a$', '', names(.)))