wordbankr: Accessing the Wordbank Database

> library(wordbankr)

バージョン: 0.1


.
get_administration_data
Get the Wordbank by-administration data
get_instrument_data Get the Wordbank administration-by-item data
get_item_data Get the Wordbank by-item data
関数名 概略
get_administration_data Get the Wordbank by-administration data
get_instrument_data Get the Wordbank administration-by-item data
get_item_data Get the Wordbank by-item data

get_administration_data

Arguments

  • language
  • form
  • filter_age
  • mode
> english_ws_admins <- get_administration_data(language = "English", 
+                                              form = "WS")
Auto-disconnecting mysql connection (0, 1)
Joining by: "momed_id"
Auto-disconnecting mysql connection (0, 0)
> english_ws_admins %>% dplyr::glimpse()
Observations: 5,498
Variables: 10
$ data_id       (dbl) 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 1...
$ age           (int) 24, 19, 24, 18, 24, 19, 30, 22, 18, 18, 18, 25, ...
$ comprehension (int) 337, 384, 76, 19, 480, 313, 555, 505, 79, 346, 8...
$ production    (int) 337, 384, 76, 19, 480, 313, 555, 505, 79, 346, 8...
$ language      (chr) "English", "English", "English", "English", "Eng...
$ form          (chr) "WS", "WS", "WS", "WS", "WS", "WS", "WS", "WS", ...
$ birth_order   (fctr) First, Second, First, First, First, First, Firs...
$ ethnicity     (fctr) Asian, Black, Other, White, White, Other, Other...
$ sex           (fctr) Female, Female, Male, Male, Female, Female, Fem...
$ mom_ed        (fctr) Graduate, College, Some Secondary, Secondary, S...

get_instrument_data

> eng_ws_data <- get_instrument_data(instrument_language = "English",
+                                    instrument_form = "WS",
+                                    items = c("item_1", "item_42"))
Auto-disconnecting mysql connection (0, 2)
> eng_ws_data %>% dplyr::glimpse()
Observations: 11,648
Variables: 3
$ data_id     (dbl) 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,...
$ value       (chr) "produces", "produces", "", "produces", "", "produ...
$ num_item_id (dbl) 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,...

get_item_data

> all_items <- get_item_data()
Auto-disconnecting mysql connection (0, 3)
> all_items %>% dplyr::glimpse()
Observations: 15,030
Variables: 11
$ item_id             (chr) "item_1", "item_2", "item_3", "item_4", "i...
$ definition          (chr) "be careful", "bring me", "change nappy", ...
$ language            (chr) "British Sign Language", "British Sign Lan...
$ form                (chr) "WG", "WG", "WG", "WG", "WG", "WG", "WG", ...
$ type                (chr) "phrases", "phrases", "phrases", "phrases"...
$ category            (chr) NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA...
$ lexical_category    (chr) NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA...
$ lexical_class       (chr) NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA...
$ uni_lemma           (chr) NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA...
$ complexity_category (chr) NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA...
$ num_item_id         (dbl) 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13,...