phoible / dev

PHOIBLE data and development.
https://phoible.org/
GNU General Public License v3.0
121 stars 30 forks source link

Duplicates? #312

Closed bambooforest closed 4 years ago

bambooforest commented 4 years ago

phoible %>% select(InventoryID, Phoneme) %>% group_by(InventoryID, Phoneme) %>% filter(n()>1)

InventoryID Phoneme

1 2478 i̯ɔ 2 2478 i̯ɔ
drammock commented 4 years ago

I just updated from master branch and I get

library(dplyr, warn.conflicts=FALSE)
phoible_col_types <- readr::cols(InventoryID="i", Marginal="l", .default="c")
phoible <- readr::read_csv('phoible.csv', col_types=phoible_col_types)
phoible %>% select(InventoryID, Phoneme) %>% group_by(InventoryID, Phoneme) %>% filter(n()>1)
# A tibble: 0 x 2
# Groups:   InventoryID, Phoneme [0]
# … with 2 variables: InventoryID <int>, Phoneme <chr>
bambooforest commented 4 years ago

@drammock -- indeed, was an older version. thanks.