sample_n does not work with grouped data

[emiliotorres]

Dear Sir,
sample_n does not respect the group_by variable. sample_frec works fine.
Best regards
Emilio

set.seed(123)
iris %>% sample_n(5) # OK
##     Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
## 44           5.0         3.5          1.6         0.6     setosa
## 118          7.7         3.8          6.7         2.2  virginica
## 61           5.0         2.0          3.5         1.0 versicolor
## 130          7.2         3.0          5.8         1.6  virginica
## 138          6.4         3.1          5.5         1.8  virginica


set.seed(123)
ig <- iris %>% group_by(Species)
ig %>% sample_n(5) # Wrong! I expect 15 (5 x 3 levels of Species). But I get the same result
## Source: local data frame [5 x 5]
## Groups: Species

##     Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
## 44           5.0         3.5          1.6         0.6     setosa
## 118          7.7         3.8          6.7         2.2  virginica
## 61           5.0         2.0          3.5         1.0 versicolor
## 130          7.2         3.0          5.8         1.6  virginica
## 138          6.4         3.1          5.5         1.8  virginica


set.seed(123)
ig %>% sample_frac(0.1) #OK
## Source: local data frame [15 x 5]
## Groups: Species

[emiliotorres]

EDIT: sample_frac also fails. I expect 5 registers for each level (5 setosa, 5 versicolor, 5 virginica), but I get a sample of the original data base:

set.seed(123)
a <- ig %>% sample_frac(0.1)
table(a$Species)
   setosa versicolor  virginica 
         3          6          6

[joranE]

Silly question: I see the sample_n.grouped_df methods in sample.R, but they aren't registered in NAMESPACE, so only sample_n.data.frame is being dispatched in 0.2. Simple oversight, or is there a reason they aren't finished yet?