tidyr complete() avec colnames comme variables

Question

Je ne parviens pas à créer la fonction complète tidyr complète() avec les noms de colonnes en tant que variables en cours d'exécution. En utilisant l'exemple intégré:

df <- data_frame(
group = c(1:2, 1), 
item_id = c(1:2, 2), 
item_name = c("a", "b", "b"), 
value1 = 1:3, 
value2 = 4:6 
) 

df %>% complete(group, nesting(item_id, item_name)) 

... fonctionne comme prévu

gr="group" 
id="item_id" 
name="item_name" 
df %>% complete_(gr, nesting_(id, name),fill = list(NA)) 

... mais ne jette pas une erreur, mais ne fonctionne pas non plus

Toute aide appréciée !

Answer 1

je pense qu'il est un bug qui complete_ peut ne pas fonctionner avec data.frames ou colonnes de la liste comme complete peut, mais voici une solution à l'aide unite_ et separate pour simuler nesting:

df %>% unite_('id_name', c(id, name)) %>% 
    complete_(c(gr, 'id_name')) %>% 
    separate(id_name, c(id, name)) 

## # A tibble: 4 × 5 
## group item_id item_name value1 value2 
## * <dbl> <chr>  <chr> <int> <int> 
## 1  1  1   a  1  4 
## 2  1  2   b  3  6 
## 3  2  1   a  NA  NA 
## 4  2  2   b  2  5