Large-scale data tools in child language acquisition

wordbankr

library(wordbankr)

help(package = "wordbankr")

ls("package:wordbankr")

## [1] "fit_aoa"                 "get_administration_data"
## [3] "get_crossling_data"      "get_crossling_items"    
## [5] "get_instrument_data"     "get_instruments"        
## [7] "get_item_data"           "get_sources"            
## [9] "summarise_items"

wordbankr: instruments

get_instruments()

wordbankr: sources

get_sources()

wordbankr: sources

get_sources(language = "English (American)")

wordbankr: administrations

admins_eng_ws <- get_administration_data(language = "English (American)", form = "WS")
admins_eng_ws

n_distinct(admins_eng_ws$data_id)

## [1] 5520

wordbankr: administrations

admins_eng_ws %>% count(age)

wordbankr: administrations

ggplot(admins_eng_ws, aes(x = age, y = production)) +
  geom_jitter(colour = "grey", size = 0.5) +
  geom_smooth() +
  labs(x = "Age (months)", y = "Productive vocabulary size")

wordbankr: administrations

admins_russian <- get_administration_data(language = "Russian")
admins_russian

wordbankr: administrations

admins_ws <- get_administration_data(form = "WS")
admins_ws

wordbankr: administrations

admins <- get_administration_data()
admins