SQLDF Jointure Gauche dans la R

Mon objectif est de prendre des "matr', le tri par colonne c1, et de garder unique(c1) où c2 = 1. Par exemple, à partir de ce code...

c1 = c("a",'a','a','b','b','b','b','c','c')
c2 = c(1,1,0,1,1,0,1,0,0)
matr = as.data.frame(cbind(c1,c2))    
one = sqldf('select distinct(c1),c2 from matr where c2 = 1')    
vs = sqldf('select distinct(c1),c0,c2 from matr group by c1')
sqldf('select matr.*,one.* from matr 
  left outer join one 
  where one.c1 = matr.c1')

arriver à:

c1 c2
a  1
b  1
c  0

Pour une raison quelconque, je perds la ligne c dans la jointure gauche. Je ne peux arriver à (par le biais d'autres jointures)

c1 c2
a  1
b  1

OriginalL'auteur Bryan | 2013-05-29