tuesdata <- tidytuesdayR::tt_load('2026-02-10')## ---- Compiling #TidyTuesday Information for 2026-02-10 ----
## --- There is 1 file available ---
##
##
## ── Downloading files ───────────────────────────────────────────────────────────
##
## 1 of 1: "schedule.csv"## Warning: The `file` argument of `vroom()` must use `I()` for literal data as of vroom
## 1.5.0.
##
## # Bad:
## vroom("X,Y\n1.5,2.3\n")
##
## # Good:
## vroom(I("X,Y\n1.5,2.3\n"))
## ℹ The deprecated feature was likely used in the readr package.
## Please report the issue at <https://github.com/tidyverse/readr/issues>.
## This warning is displayed once per session.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.schedule <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/main/data/2026/2026-02-10/schedule.csv')## Rows: 1866 Columns: 21
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (11): discipline_code, discipline_name, event_code, event_description, ...
## lgl (3): is_medal_event, is_training, estimated_start
## dttm (4): start_datetime_local, end_datetime_local, start_datetime_utc, end...
## date (1): date
## time (2): start_time, end_time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.schedule$discipline_name ## [1] "Alpine Skiing" "Alpine Skiing"
## [3] "Alpine Skiing" "Curling"
## [5] "Curling" "Curling"
## [7] "Curling" "Curling"
## [9] "Curling" "Curling"
## [11] "Curling" "Curling"
## [13] "Curling" "Curling"
## [15] "Curling" "Curling"
## [17] "Curling" "Ice Hockey"
## [19] "Ice Hockey" "Ice Hockey"
## [21] "Ice Hockey" "Luge"
## [23] "Luge" "Luge"
## [25] "Luge" "Luge"
## [27] "Luge" "Ski Jumping"
## [29] "Ski Jumping" "Snowboard"
## [31] "Snowboard" "Snowboard"
## [33] "Alpine Skiing" "Alpine Skiing"
## [35] "Alpine Skiing" "Alpine Skiing"
## [37] "Alpine Skiing" "Curling"
## [39] "Curling" "Curling"
## [41] "Curling" "Curling"
## [43] "Curling" "Curling"
## [45] "Curling" "Curling"
## [47] "Curling" "Curling"
## [49] "Curling" "Curling"
## [51] "Curling" "Curling"
## [53] "Curling" "Curling"
## [55] "Curling" "Curling"
## [57] "Curling" "Curling"
## [59] "Figure Skating" "Figure Skating"
## [61] "Figure Skating" "Ice Hockey"
## [63] "Ice Hockey" "Ice Hockey"
## [65] "Ice Hockey" "Ice Hockey"
## [67] "Ice Hockey" "Luge"
## [69] "Luge" "Luge"
## [71] "Luge" "Luge"
## [73] "Luge" "Luge"
## [75] "Luge" "Ski Jumping"
## [77] "Ski Jumping" "Ski Jumping"
## [79] "Snowboard" "Snowboard"
## [81] "Snowboard" "Alpine Skiing"
## [83] "Alpine Skiing" "Alpine Skiing"
## [85] "Alpine Skiing" "Alpine Skiing"
## [87] "Alpine Skiing" "Cross-Country Skiing"
## [89] "Curling" "Curling"
## [91] "Curling" "Curling"
## [93] "Curling" "Curling"
## [95] "Curling" "Curling"
## [97] "Curling" "Curling"
## [99] "Curling" "Curling"
## [101] "Curling" "Curling"
## [103] "Curling" "Curling"
## [105] "Curling" "Curling"
## [107] "Curling" "Curling"
## [109] "Curling" "Curling"
## [111] "Curling" "Curling"
## [113] "Curling" "Curling"
## [115] "Curling" "Figure Skating"
## [117] "Figure Skating" "Figure Skating"
## [119] "Figure Skating" "Figure Skating"
## [121] "Freestyle Skiing" "Freestyle Skiing"
## [123] "Freestyle Skiing" "Freestyle Skiing"
## [125] "Ice Hockey" "Ice Hockey"
## [127] "Ice Hockey" "Ice Hockey"
## [129] "Ice Hockey" "Ice Hockey"
## [131] "Ice Hockey" "Ice Hockey"
## [133] "Ice Hockey" "Ice Hockey"
## [135] "Luge" "Luge"
## [137] "Luge" "Luge"
## [139] "Luge" "Luge"
## [141] "Luge" "Luge"
## [143] "Luge" "Luge"
## [145] "Ski Jumping" "Ski Jumping"
## [147] "Ski Jumping" "Ski Jumping"
## [149] "Ski Jumping" "Ski Jumping"
## [151] "Snowboard" "Snowboard"
## [153] "Snowboard" "Snowboard"
## [155] "Snowboard" "Snowboard"
## [157] "Speed Skating" "Alpine Skiing"
## [159] "Alpine Skiing" "Alpine Skiing"
## [161] "Alpine Skiing" "Alpine Skiing"
## [163] "Biathlon" "Cross-Country Skiing"
## [165] "Cross-Country Skiing" "Curling"
## [167] "Curling" "Curling"
## [169] "Curling" "Curling"
## [171] "Curling" "Curling"
## [173] "Curling" "Curling"
## [175] "Curling" "Curling"
## [177] "Curling" "Curling"
## [179] "Curling" "Curling"
## [181] "Curling" "Curling"
## [183] "Curling" "Curling"
## [185] "Curling" "Curling"
## [187] "Curling" "Curling"
## [189] "Curling" "Curling"
## [191] "Curling" "Curling"
## [193] "Figure Skating" "Figure Skating"
## [195] "Figure Skating" "Figure Skating"
## [197] "Figure Skating" "Figure Skating"
## [199] "Figure Skating" "Figure Skating"
## [201] "Freestyle Skiing" "Freestyle Skiing"
## [203] "Freestyle Skiing" "Freestyle Skiing"
## [205] "Ice Hockey" "Ice Hockey"
## [207] "Ice Hockey" "Ice Hockey"
## [209] "Ice Hockey" "Ice Hockey"
## [211] "Ice Hockey" "Ice Hockey"
## [213] "Luge" "Luge"
## [215] "Luge" "Luge"
## [217] "Luge" "Luge"
## [219] "Luge" "Luge"
## [221] "Luge" "Luge"
## [223] "Luge" "Luge"
## [225] "Luge" "Luge"
## [227] "Ski Jumping" "Ski Jumping"
## [229] "Ski Jumping" "Ski Jumping"
## [231] "Ski Jumping" "Ski Jumping"
## [233] "Snowboard" "Snowboard"
## [235] "Snowboard" "Snowboard"
## [237] "Snowboard" "Snowboard"
## [239] "Snowboard" "Snowboard"
## [241] "Snowboard" "Snowboard"
## [243] "Snowboard" "Snowboard"
## [245] "Snowboard" "Snowboard"
## [247] "Snowboard" "Snowboard"
## [249] "Snowboard" "Snowboard"
## [251] "Snowboard" "Snowboard"
## [253] "Speed Skating" "Speed Skating"
## [255] "Alpine Skiing" "Alpine Skiing"
## [257] "Alpine Skiing" "Alpine Skiing"
## [259] "Alpine Skiing" "Alpine Skiing"
## [261] "Biathlon" "Cross-Country Skiing"
## [263] "Cross-Country Skiing" "Curling"
## [265] "Curling" "Curling"
## [267] "Curling" "Curling"
## [269] "Curling" "Curling"
## [271] "Curling" "Curling"
## [273] "Curling" "Curling"
## [275] "Curling" "Curling"
## [277] "Curling" "Curling"
## [279] "Curling" "Curling"
## [281] "Curling" "Curling"
## [283] "Curling" "Curling"
## [285] "Curling" "Curling"
## [287] "Curling" "Curling"
## [289] "Curling" "Figure Skating"
## [291] "Figure Skating" "Figure Skating"
## [293] "Figure Skating" "Figure Skating"
## [295] "Figure Skating" "Freestyle Skiing"
## [297] "Freestyle Skiing" "Freestyle Skiing"
## [299] "Freestyle Skiing" "Freestyle Skiing"
## [301] "Freestyle Skiing" "Freestyle Skiing"
## [303] "Ice Hockey" "Ice Hockey"
## [305] "Ice Hockey" "Ice Hockey"
## [307] "Ice Hockey" "Ice Hockey"
## [309] "Ice Hockey" "Ice Hockey"
## [311] "Ice Hockey" "Ice Hockey"
## [313] "Luge" "Luge"
## [315] "Luge" "Luge"
## [317] "Luge" "Luge"
## [319] "Luge" "Luge"
## [321] "Luge" "Luge"
## [323] "Luge" "Luge"
## [325] "Luge" "Luge"
## [327] "Luge" "Luge"
## [329] "Luge" "Luge"
## [331] "Nordic Combined" "Skeleton"
## [333] "Skeleton" "Skeleton"
## [335] "Skeleton" "Ski Jumping"
## [337] "Ski Jumping" "Ski Jumping"
## [339] "Ski Jumping" "Ski Jumping"
## [341] "Ski Jumping" "Ski Jumping"
## [343] "Ski Jumping" "Snowboard"
## [345] "Snowboard" "Snowboard"
## [347] "Snowboard" "Snowboard"
## [349] "Snowboard" "Snowboard"
## [351] "Snowboard" "Snowboard"
## [353] "Snowboard" "Snowboard"
## [355] "Snowboard" "Snowboard"
## [357] "Snowboard" "Snowboard"
## [359] "Snowboard" "Snowboard"
## [361] "Snowboard" "Snowboard"
## [363] "Snowboard" "Snowboard"
## [365] "Snowboard" "Snowboard"
## [367] "Speed Skating" "Speed Skating"
## [369] "Speed Skating" "Alpine Skiing"
## [371] "Alpine Skiing" "Alpine Skiing"
## [373] "Alpine Skiing" "Alpine Skiing"
## [375] "Alpine Skiing" "Biathlon"
## [377] "Biathlon" "Cross-Country Skiing"
## [379] "Cross-Country Skiing" "Cross-Country Skiing"
## [381] "Cross-Country Skiing" "Cross-Country Skiing"
## [383] "Cross-Country Skiing" "Cross-Country Skiing"
## [385] "Cross-Country Skiing" "Cross-Country Skiing"
## [387] "Curling" "Curling"
## [389] "Curling" "Curling"
## [391] "Curling" "Curling"
## [393] "Curling" "Curling"
## [395] "Curling" "Curling"
## [397] "Curling" "Curling"
## [399] "Curling" "Curling"
## [401] "Curling" "Curling"
## [403] "Curling" "Curling"
## [405] "Figure Skating" "Figure Skating"
## [407] "Figure Skating" "Figure Skating"
## [409] "Figure Skating" "Freestyle Skiing"
## [411] "Freestyle Skiing" "Freestyle Skiing"
## [413] "Freestyle Skiing" "Freestyle Skiing"
## [415] "Freestyle Skiing" "Freestyle Skiing"
## [417] "Freestyle Skiing" "Ice Hockey"
## [419] "Ice Hockey" "Ice Hockey"
## [421] "Ice Hockey" "Ice Hockey"
## [423] "Ice Hockey" "Ice Hockey"
## [425] "Ice Hockey" "Ice Hockey"
## [427] "Ice Hockey" "Luge"
## [429] "Luge" "Luge"
## [431] "Luge" "Luge"
## [433] "Luge" "Luge"
## [435] "Luge" "Luge"
## [437] "Luge" "Luge"
## [439] "Luge" "Luge"
## [441] "Luge" "Luge"
## [443] "Luge" "Luge"
## [445] "Luge" "Luge"
## [447] "Luge" "Nordic Combined"
## [449] "Nordic Combined" "Short Track Speed Skating"
## [451] "Short Track Speed Skating" "Short Track Speed Skating"
## [453] "Short Track Speed Skating" "Short Track Speed Skating"
## [455] "Short Track Speed Skating" "Skeleton"
## [457] "Skeleton" "Skeleton"
## [459] "Skeleton" "Skeleton"
## [461] "Skeleton" "Skeleton"
## [463] "Skeleton" "Ski Jumping"
## [465] "Ski Jumping" "Ski Jumping"
## [467] "Ski Jumping" "Ski Jumping"
## [469] "Ski Jumping" "Ski Jumping"
## [471] "Ski Jumping" "Snowboard"
## [473] "Snowboard" "Snowboard"
## [475] "Snowboard" "Snowboard"
## [477] "Snowboard" "Snowboard"
## [479] "Snowboard" "Snowboard"
## [481] "Snowboard" "Snowboard"
## [483] "Snowboard" "Snowboard"
## [485] "Snowboard" "Snowboard"
## [487] "Snowboard" "Snowboard"
## [489] "Snowboard" "Snowboard"
## [491] "Snowboard" "Speed Skating"
## [493] "Speed Skating" "Alpine Skiing"
## [495] "Alpine Skiing" "Alpine Skiing"
## [497] "Alpine Skiing" "Alpine Skiing"
## [499] "Alpine Skiing" "Biathlon"
## [501] "Biathlon" "Cross-Country Skiing"
## [503] "Cross-Country Skiing" "Cross-Country Skiing"
## [505] "Cross-Country Skiing" "Cross-Country Skiing"
## [507] "Cross-Country Skiing" "Cross-Country Skiing"
## [509] "Cross-Country Skiing" "Curling"
## [511] "Curling" "Curling"
## [513] "Curling" "Curling"
## [515] "Curling" "Curling"
## [517] "Curling" "Curling"
## [519] "Curling" "Curling"
## [521] "Curling" "Figure Skating"
## [523] "Figure Skating" "Figure Skating"
## [525] "Freestyle Skiing" "Freestyle Skiing"
## [527] "Freestyle Skiing" "Freestyle Skiing"
## [529] "Freestyle Skiing" "Freestyle Skiing"
## [531] "Freestyle Skiing" "Freestyle Skiing"
## [533] "Freestyle Skiing" "Freestyle Skiing"
## [535] "Freestyle Skiing" "Ice Hockey"
## [537] "Ice Hockey" "Ice Hockey"
## [539] "Ice Hockey" "Ice Hockey"
## [541] "Ice Hockey" "Ice Hockey"
## [543] "Ice Hockey" "Ice Hockey"
## [545] "Ice Hockey" "Luge"
## [547] "Luge" "Luge"
## [549] "Luge" "Luge"
## [551] "Luge" "Luge"
## [553] "Luge" "Luge"
## [555] "Luge" "Luge"
## [557] "Luge" "Luge"
## [559] "Luge" "Luge"
## [561] "Luge" "Nordic Combined"
## [563] "Nordic Combined" "Nordic Combined"
## [565] "Nordic Combined" "Nordic Combined"
## [567] "Short Track Speed Skating" "Short Track Speed Skating"
## [569] "Short Track Speed Skating" "Short Track Speed Skating"
## [571] "Short Track Speed Skating" "Short Track Speed Skating"
## [573] "Skeleton" "Skeleton"
## [575] "Skeleton" "Skeleton"
## [577] "Skeleton" "Skeleton"
## [579] "Skeleton" "Skeleton"
## [581] "Skeleton" "Skeleton"
## [583] "Skeleton" "Skeleton"
## [585] "Ski Jumping" "Ski Jumping"
## [587] "Ski Jumping" "Ski Jumping"
## [589] "Ski Jumping" "Ski Jumping"
## [591] "Snowboard" "Snowboard"
## [593] "Snowboard" "Snowboard"
## [595] "Snowboard" "Snowboard"
## [597] "Snowboard" "Speed Skating"
## [599] "Speed Skating" "Alpine Skiing"
## [601] "Alpine Skiing" "Alpine Skiing"
## [603] "Alpine Skiing" "Biathlon"
## [605] "Biathlon" "Bobsleigh"
## [607] "Bobsleigh" "Bobsleigh"
## [609] "Bobsleigh" "Cross-Country Skiing"
## [611] "Cross-Country Skiing" "Cross-Country Skiing"
## [613] "Cross-Country Skiing" "Cross-Country Skiing"
## [615] "Cross-Country Skiing" "Cross-Country Skiing"
## [617] "Cross-Country Skiing" "Cross-Country Skiing"
## [619] "Curling" "Curling"
## [621] "Curling" "Curling"
## [623] "Curling" "Curling"
## [625] "Curling" "Curling"
## [627] "Curling" "Curling"
## [629] "Curling" "Curling"
## [631] "Curling" "Curling"
## [633] "Curling" "Curling"
## [635] "Curling" "Figure Skating"
## [637] "Figure Skating" "Freestyle Skiing"
## [639] "Freestyle Skiing" "Freestyle Skiing"
## [641] "Freestyle Skiing" "Freestyle Skiing"
## [643] "Freestyle Skiing" "Freestyle Skiing"
## [645] "Freestyle Skiing" "Freestyle Skiing"
## [647] "Freestyle Skiing" "Freestyle Skiing"
## [649] "Ice Hockey" "Ice Hockey"
## [651] "Ice Hockey" "Ice Hockey"
## [653] "Ice Hockey" "Ice Hockey"
## [655] "Ice Hockey" "Ice Hockey"
## [657] "Ice Hockey" "Ice Hockey"
## [659] "Luge" "Luge"
## [661] "Luge" "Luge"
## [663] "Luge" "Luge"
## [665] "Luge" "Luge"
## [667] "Luge" "Luge"
## [669] "Luge" "Nordic Combined"
## [671] "Nordic Combined" "Nordic Combined"
## [673] "Nordic Combined" "Short Track Speed Skating"
## [675] "Short Track Speed Skating" "Short Track Speed Skating"
## [677] "Short Track Speed Skating" "Short Track Speed Skating"
## [679] "Short Track Speed Skating" "Short Track Speed Skating"
## [681] "Short Track Speed Skating" "Short Track Speed Skating"
## [683] "Short Track Speed Skating" "Short Track Speed Skating"
## [685] "Short Track Speed Skating" "Short Track Speed Skating"
## [687] "Short Track Speed Skating" "Skeleton"
## [689] "Skeleton" "Skeleton"
## [691] "Skeleton" "Skeleton"
## [693] "Skeleton" "Skeleton"
## [695] "Skeleton" "Skeleton"
## [697] "Skeleton" "Ski Jumping"
## [699] "Ski Jumping" "Ski Jumping"
## [701] "Ski Jumping" "Ski Jumping"
## [703] "Snowboard" "Snowboard"
## [705] "Snowboard" "Snowboard"
## [707] "Snowboard" "Snowboard"
## [709] "Snowboard" "Snowboard"
## [711] "Snowboard" "Snowboard"
## [713] "Snowboard" "Snowboard"
## [715] "Snowboard" "Snowboard"
## [717] "Speed Skating" "Speed Skating"
## [719] "Alpine Skiing" "Alpine Skiing"
## [721] "Biathlon" "Biathlon"
## [723] "Bobsleigh" "Bobsleigh"
## [725] "Bobsleigh" "Bobsleigh"
## [727] "Bobsleigh" "Bobsleigh"
## [729] "Bobsleigh" "Bobsleigh"
## [731] "Cross-Country Skiing" "Cross-Country Skiing"
## [733] "Curling" "Curling"
## [735] "Curling" "Curling"
## [737] "Curling" "Curling"
## [739] "Curling" "Curling"
## [741] "Curling" "Curling"
## [743] "Curling" "Curling"
## [745] "Curling" "Curling"
## [747] "Curling" "Curling"
## [749] "Curling" "Curling"
## [751] "Curling" "Curling"
## [753] "Curling" "Curling"
## [755] "Curling" "Curling"
## [757] "Curling" "Curling"
## [759] "Curling" "Figure Skating"
## [761] "Figure Skating" "Freestyle Skiing"
## [763] "Freestyle Skiing" "Freestyle Skiing"
## [765] "Freestyle Skiing" "Freestyle Skiing"
## [767] "Freestyle Skiing" "Ice Hockey"
## [769] "Ice Hockey" "Ice Hockey"
## [771] "Ice Hockey" "Ice Hockey"
## [773] "Ice Hockey" "Ice Hockey"
## [775] "Ice Hockey" "Ice Hockey"
## [777] "Ice Hockey" "Ice Hockey"
## [779] "Ice Hockey" "Luge"
## [781] "Luge" "Luge"
## [783] "Luge" "Luge"
## [785] "Nordic Combined" "Nordic Combined"
## [787] "Nordic Combined" "Nordic Combined"
## [789] "Short Track Speed Skating" "Short Track Speed Skating"
## [791] "Short Track Speed Skating" "Short Track Speed Skating"
## [793] "Short Track Speed Skating" "Short Track Speed Skating"
## [795] "Short Track Speed Skating" "Short Track Speed Skating"
## [797] "Skeleton" "Skeleton"
## [799] "Skeleton" "Skeleton"
## [801] "Skeleton" "Skeleton"
## [803] "Skeleton" "Skeleton"
## [805] "Skeleton" "Skeleton"
## [807] "Ski Jumping" "Ski Jumping"
## [809] "Ski Jumping" "Snowboard"
## [811] "Snowboard" "Snowboard"
## [813] "Snowboard" "Snowboard"
## [815] "Snowboard" "Snowboard"
## [817] "Snowboard" "Snowboard"
## [819] "Snowboard" "Snowboard"
## [821] "Snowboard" "Snowboard"
## [823] "Snowboard" "Snowboard"
## [825] "Snowboard" "Snowboard"
## [827] "Snowboard" "Snowboard"
## [829] "Snowboard" "Snowboard"
## [831] "Snowboard" "Snowboard"
## [833] "Snowboard" "Speed Skating"
## [835] "Speed Skating" "Speed Skating"
## [837] "Alpine Skiing" "Alpine Skiing"
## [839] "Alpine Skiing" "Biathlon"
## [841] "Biathlon" "Bobsleigh"
## [843] "Bobsleigh" "Bobsleigh"
## [845] "Bobsleigh" "Bobsleigh"
## [847] "Bobsleigh" "Bobsleigh"
## [849] "Bobsleigh" "Bobsleigh"
## [851] "Bobsleigh" "Bobsleigh"
## [853] "Bobsleigh" "Cross-Country Skiing"
## [855] "Cross-Country Skiing" "Cross-Country Skiing"
## [857] "Curling" "Curling"
## [859] "Curling" "Curling"
## [861] "Curling" "Curling"
## [863] "Curling" "Curling"
## [865] "Curling" "Curling"
## [867] "Curling" "Curling"
## [869] "Curling" "Curling"
## [871] "Curling" "Curling"
## [873] "Curling" "Curling"
## [875] "Curling" "Curling"
## [877] "Curling" "Curling"
## [879] "Curling" "Curling"
## [881] "Curling" "Curling"
## [883] "Curling" "Curling"
## [885] "Curling" "Curling"
## [887] "Curling" "Curling"
## [889] "Curling" "Curling"
## [891] "Figure Skating" "Freestyle Skiing"
## [893] "Freestyle Skiing" "Freestyle Skiing"
## [895] "Freestyle Skiing" "Freestyle Skiing"
## [897] "Freestyle Skiing" "Freestyle Skiing"
## [899] "Freestyle Skiing" "Freestyle Skiing"
## [901] "Freestyle Skiing" "Freestyle Skiing"
## [903] "Freestyle Skiing" "Ice Hockey"
## [905] "Ice Hockey" "Ice Hockey"
## [907] "Ice Hockey" "Ice Hockey"
## [909] "Ice Hockey" "Ice Hockey"
## [911] "Ice Hockey" "Ice Hockey"
## [913] "Ice Hockey" "Ice Hockey"
## [915] "Ice Hockey" "Ice Hockey"
## [917] "Ice Hockey" "Ice Hockey"
## [919] "Ice Hockey" "Luge"
## [921] "Nordic Combined" "Short Track Speed Skating"
## [923] "Short Track Speed Skating" "Short Track Speed Skating"
## [925] "Short Track Speed Skating" "Short Track Speed Skating"
## [927] "Short Track Speed Skating" "Short Track Speed Skating"
## [929] "Short Track Speed Skating" "Short Track Speed Skating"
## [931] "Short Track Speed Skating" "Short Track Speed Skating"
## [933] "Short Track Speed Skating" "Short Track Speed Skating"
## [935] "Short Track Speed Skating" "Skeleton"
## [937] "Skeleton" "Skeleton"
## [939] "Skeleton" "Skeleton"
## [941] "Skeleton" "Skeleton"
## [943] "Skeleton" "Ski Jumping"
## [945] "Ski Jumping" "Ski Jumping"
## [947] "Ski Jumping" "Ski Jumping"
## [949] "Ski Jumping" "Ski Jumping"
## [951] "Snowboard" "Snowboard"
## [953] "Snowboard" "Snowboard"
## [955] "Snowboard" "Snowboard"
## [957] "Snowboard" "Snowboard"
## [959] "Snowboard" "Snowboard"
## [961] "Snowboard" "Snowboard"
## [963] "Snowboard" "Snowboard"
## [965] "Snowboard" "Snowboard"
## [967] "Snowboard" "Snowboard"
## [969] "Snowboard" "Snowboard"
## [971] "Speed Skating" "Speed Skating"
## [973] "Speed Skating" "Speed Skating"
## [975] "Alpine Skiing" "Alpine Skiing"
## [977] "Alpine Skiing" "Alpine Skiing"
## [979] "Biathlon" "Biathlon"
## [981] "Biathlon" "Biathlon"
## [983] "Bobsleigh" "Bobsleigh"
## [985] "Bobsleigh" "Bobsleigh"
## [987] "Bobsleigh" "Bobsleigh"
## [989] "Bobsleigh" "Bobsleigh"
## [991] "Bobsleigh" "Bobsleigh"
## [993] "Cross-Country Skiing" "Cross-Country Skiing"
## [995] "Cross-Country Skiing" "Curling"
## [997] "Curling" "Curling"
## [999] "Curling" "Curling"
## [1001] "Curling" "Curling"
## [1003] "Curling" "Curling"
## [1005] "Curling" "Curling"
## [1007] "Curling" "Curling"
## [1009] "Curling" "Curling"
## [1011] "Curling" "Curling"
## [1013] "Curling" "Curling"
## [1015] "Curling" "Curling"
## [1017] "Curling" "Curling"
## [1019] "Curling" "Curling"
## [1021] "Curling" "Curling"
## [1023] "Curling" "Curling"
## [1025] "Curling" "Curling"
## [1027] "Curling" "Curling"
## [1029] "Curling" "Figure Skating"
## [1031] "Figure Skating" "Freestyle Skiing"
## [1033] "Freestyle Skiing" "Freestyle Skiing"
## [1035] "Freestyle Skiing" "Freestyle Skiing"
## [1037] "Freestyle Skiing" "Freestyle Skiing"
## [1039] "Freestyle Skiing" "Freestyle Skiing"
## [1041] "Freestyle Skiing" "Freestyle Skiing"
## [1043] "Freestyle Skiing" "Freestyle Skiing"
## [1045] "Freestyle Skiing" "Freestyle Skiing"
## [1047] "Freestyle Skiing" "Freestyle Skiing"
## [1049] "Freestyle Skiing" "Ice Hockey"
## [1051] "Ice Hockey" "Ice Hockey"
## [1053] "Ice Hockey" "Ice Hockey"
## [1055] "Ice Hockey" "Ice Hockey"
## [1057] "Ice Hockey" "Ice Hockey"
## [1059] "Ice Hockey" "Ice Hockey"
## [1061] "Ice Hockey" "Ice Hockey"
## [1063] "Ice Hockey" "Ice Hockey"
## [1065] "Ice Hockey" "Nordic Combined"
## [1067] "Nordic Combined" "Short Track Speed Skating"
## [1069] "Short Track Speed Skating" "Short Track Speed Skating"
## [1071] "Short Track Speed Skating" "Short Track Speed Skating"
## [1073] "Short Track Speed Skating" "Skeleton"
## [1075] "Skeleton" "Skeleton"
## [1077] "Skeleton" "Skeleton"
## [1079] "Skeleton" "Skeleton"
## [1081] "Ski Jumping" "Ski Jumping"
## [1083] "Ski Jumping" "Ski Jumping"
## [1085] "Ski Jumping" "Ski Jumping"
## [1087] "Ski Jumping" "Ski Jumping"
## [1089] "Ski Jumping" "Snowboard"
## [1091] "Snowboard" "Snowboard"
## [1093] "Snowboard" "Snowboard"
## [1095] "Snowboard" "Snowboard"
## [1097] "Snowboard" "Snowboard"
## [1099] "Snowboard" "Snowboard"
## [1101] "Snowboard" "Snowboard"
## [1103] "Snowboard" "Speed Skating"
## [1105] "Speed Skating" "Speed Skating"
## [1107] "Speed Skating" "Speed Skating"
## [1109] "Alpine Skiing" "Alpine Skiing"
## [1111] "Alpine Skiing" "Alpine Skiing"
## [1113] "Alpine Skiing" "Alpine Skiing"
## [1115] "Biathlon" "Biathlon"
## [1117] "Biathlon" "Bobsleigh"
## [1119] "Bobsleigh" "Bobsleigh"
## [1121] "Bobsleigh" "Bobsleigh"
## [1123] "Bobsleigh" "Bobsleigh"
## [1125] "Bobsleigh" "Bobsleigh"
## [1127] "Bobsleigh" "Cross-Country Skiing"
## [1129] "Cross-Country Skiing" "Curling"
## [1131] "Curling" "Curling"
## [1133] "Curling" "Curling"
## [1135] "Curling" "Curling"
## [1137] "Curling" "Curling"
## [1139] "Curling" "Curling"
## [1141] "Curling" "Curling"
## [1143] "Curling" "Curling"
## [1145] "Curling" "Curling"
## [1147] "Curling" "Curling"
## [1149] "Curling" "Curling"
## [1151] "Curling" "Curling"
## [1153] "Curling" "Curling"
## [1155] "Curling" "Curling"
## [1157] "Curling" "Curling"
## [1159] "Curling" "Curling"
## [1161] "Curling" "Curling"
## [1163] "Figure Skating" "Figure Skating"
## [1165] "Freestyle Skiing" "Freestyle Skiing"
## [1167] "Freestyle Skiing" "Freestyle Skiing"
## [1169] "Freestyle Skiing" "Freestyle Skiing"
## [1171] "Freestyle Skiing" "Freestyle Skiing"
## [1173] "Freestyle Skiing" "Freestyle Skiing"
## [1175] "Freestyle Skiing" "Freestyle Skiing"
## [1177] "Freestyle Skiing" "Freestyle Skiing"
## [1179] "Freestyle Skiing" "Freestyle Skiing"
## [1181] "Freestyle Skiing" "Freestyle Skiing"
## [1183] "Freestyle Skiing" "Freestyle Skiing"
## [1185] "Freestyle Skiing" "Ice Hockey"
## [1187] "Ice Hockey" "Ice Hockey"
## [1189] "Ice Hockey" "Ice Hockey"
## [1191] "Ice Hockey" "Ice Hockey"
## [1193] "Ice Hockey" "Ice Hockey"
## [1195] "Ice Hockey" "Ice Hockey"
## [1197] "Ice Hockey" "Nordic Combined"
## [1199] "Nordic Combined" "Short Track Speed Skating"
## [1201] "Short Track Speed Skating" "Short Track Speed Skating"
## [1203] "Short Track Speed Skating" "Short Track Speed Skating"
## [1205] "Short Track Speed Skating" "Short Track Speed Skating"
## [1207] "Short Track Speed Skating" "Short Track Speed Skating"
## [1209] "Short Track Speed Skating" "Short Track Speed Skating"
## [1211] "Short Track Speed Skating" "Skeleton"
## [1213] "Skeleton" "Skeleton"
## [1215] "Ski Jumping" "Ski Jumping"
## [1217] "Ski Jumping" "Ski Jumping"
## [1219] "Ski Jumping" "Ski Jumping"
## [1221] "Ski Jumping" "Ski Jumping"
## [1223] "Ski Jumping" "Ski Jumping"
## [1225] "Ski Jumping" "Ski Jumping"
## [1227] "Snowboard" "Snowboard"
## [1229] "Snowboard" "Snowboard"
## [1231] "Snowboard" "Snowboard"
## [1233] "Snowboard" "Snowboard"
## [1235] "Speed Skating" "Speed Skating"
## [1237] "Speed Skating" "Speed Skating"
## [1239] "Alpine Skiing" "Alpine Skiing"
## [1241] "Alpine Skiing" "Alpine Skiing"
## [1243] "Biathlon" "Biathlon"
## [1245] "Biathlon" "Bobsleigh"
## [1247] "Bobsleigh" "Bobsleigh"
## [1249] "Bobsleigh" "Bobsleigh"
## [1251] "Bobsleigh" "Bobsleigh"
## [1253] "Bobsleigh" "Bobsleigh"
## [1255] "Bobsleigh" "Cross-Country Skiing"
## [1257] "Curling" "Curling"
## [1259] "Curling" "Curling"
## [1261] "Curling" "Curling"
## [1263] "Curling" "Curling"
## [1265] "Curling" "Curling"
## [1267] "Curling" "Curling"
## [1269] "Curling" "Curling"
## [1271] "Curling" "Curling"
## [1273] "Curling" "Curling"
## [1275] "Curling" "Curling"
## [1277] "Curling" "Curling"
## [1279] "Curling" "Curling"
## [1281] "Curling" "Curling"
## [1283] "Curling" "Curling"
## [1285] "Curling" "Curling"
## [1287] "Curling" "Curling"
## [1289] "Curling" "Figure Skating"
## [1291] "Figure Skating" "Figure Skating"
## [1293] "Freestyle Skiing" "Freestyle Skiing"
## [1295] "Freestyle Skiing" "Freestyle Skiing"
## [1297] "Freestyle Skiing" "Freestyle Skiing"
## [1299] "Freestyle Skiing" "Freestyle Skiing"
## [1301] "Freestyle Skiing" "Freestyle Skiing"
## [1303] "Freestyle Skiing" "Freestyle Skiing"
## [1305] "Freestyle Skiing" "Freestyle Skiing"
## [1307] "Freestyle Skiing" "Freestyle Skiing"
## [1309] "Freestyle Skiing" "Freestyle Skiing"
## [1311] "Freestyle Skiing" "Ice Hockey"
## [1313] "Ice Hockey" "Ice Hockey"
## [1315] "Ice Hockey" "Ice Hockey"
## [1317] "Ice Hockey" "Ice Hockey"
## [1319] "Ice Hockey" "Ice Hockey"
## [1321] "Ice Hockey" "Nordic Combined"
## [1323] "Nordic Combined" "Nordic Combined"
## [1325] "Nordic Combined" "Nordic Combined"
## [1327] "Short Track Speed Skating" "Short Track Speed Skating"
## [1329] "Short Track Speed Skating" "Short Track Speed Skating"
## [1331] "Short Track Speed Skating" "Short Track Speed Skating"
## [1333] "Skeleton" "Ski Jumping"
## [1335] "Ski Jumping" "Ski Jumping"
## [1337] "Ski Jumping" "Ski Jumping"
## [1339] "Ski Jumping" "Ski Jumping"
## [1341] "Ski Jumping" "Snowboard"
## [1343] "Snowboard" "Snowboard"
## [1345] "Snowboard" "Snowboard"
## [1347] "Snowboard" "Snowboard"
## [1349] "Snowboard" "Snowboard"
## [1351] "Snowboard" "Snowboard"
## [1353] "Speed Skating" "Speed Skating"
## [1355] "Speed Skating" "Speed Skating"
## [1357] "Speed Skating" "Speed Skating"
## [1359] "Speed Skating" "Speed Skating"
## [1361] "Speed Skating" "Speed Skating"
## [1363] "Speed Skating" "Speed Skating"
## [1365] "Alpine Skiing" "Alpine Skiing"
## [1367] "Alpine Skiing" "Alpine Skiing"
## [1369] "Biathlon" "Biathlon"
## [1371] "Bobsleigh" "Bobsleigh"
## [1373] "Bobsleigh" "Bobsleigh"
## [1375] "Bobsleigh" "Bobsleigh"
## [1377] "Bobsleigh" "Bobsleigh"
## [1379] "Bobsleigh" "Bobsleigh"
## [1381] "Bobsleigh" "Bobsleigh"
## [1383] "Cross-Country Skiing" "Cross-Country Skiing"
## [1385] "Cross-Country Skiing" "Cross-Country Skiing"
## [1387] "Curling" "Curling"
## [1389] "Curling" "Curling"
## [1391] "Curling" "Curling"
## [1393] "Curling" "Curling"
## [1395] "Curling" "Curling"
## [1397] "Curling" "Curling"
## [1399] "Curling" "Curling"
## [1401] "Curling" "Curling"
## [1403] "Curling" "Curling"
## [1405] "Curling" "Curling"
## [1407] "Curling" "Curling"
## [1409] "Curling" "Curling"
## [1411] "Curling" "Curling"
## [1413] "Curling" "Curling"
## [1415] "Curling" "Curling"
## [1417] "Curling" "Curling"
## [1419] "Curling" "Figure Skating"
## [1421] "Figure Skating" "Freestyle Skiing"
## [1423] "Freestyle Skiing" "Freestyle Skiing"
## [1425] "Freestyle Skiing" "Freestyle Skiing"
## [1427] "Freestyle Skiing" "Freestyle Skiing"
## [1429] "Freestyle Skiing" "Freestyle Skiing"
## [1431] "Freestyle Skiing" "Freestyle Skiing"
## [1433] "Freestyle Skiing" "Ice Hockey"
## [1435] "Ice Hockey" "Ice Hockey"
## [1437] "Ice Hockey" "Ice Hockey"
## [1439] "Ice Hockey" "Ice Hockey"
## [1441] "Ice Hockey" "Ice Hockey"
## [1443] "Ice Hockey" "Nordic Combined"
## [1445] "Nordic Combined" "Nordic Combined"
## [1447] "Nordic Combined" "Nordic Combined"
## [1449] "Short Track Speed Skating" "Short Track Speed Skating"
## [1451] "Short Track Speed Skating" "Short Track Speed Skating"
## [1453] "Short Track Speed Skating" "Short Track Speed Skating"
## [1455] "Short Track Speed Skating" "Short Track Speed Skating"
## [1457] "Short Track Speed Skating" "Short Track Speed Skating"
## [1459] "Short Track Speed Skating" "Short Track Speed Skating"
## [1461] "Ski Jumping" "Ski Jumping"
## [1463] "Ski Jumping" "Ski Jumping"
## [1465] "Snowboard" "Snowboard"
## [1467] "Snowboard" "Snowboard"
## [1469] "Snowboard" "Snowboard"
## [1471] "Snowboard" "Snowboard"
## [1473] "Snowboard" "Snowboard"
## [1475] "Speed Skating" "Speed Skating"
## [1477] "Speed Skating" "Speed Skating"
## [1479] "Speed Skating" "Speed Skating"
## [1481] "Speed Skating" "Speed Skating"
## [1483] "Speed Skating" "Speed Skating"
## [1485] "Alpine Skiing" "Alpine Skiing"
## [1487] "Biathlon" "Biathlon"
## [1489] "Bobsleigh" "Bobsleigh"
## [1491] "Bobsleigh" "Bobsleigh"
## [1493] "Bobsleigh" "Bobsleigh"
## [1495] "Bobsleigh" "Bobsleigh"
## [1497] "Bobsleigh" "Bobsleigh"
## [1499] "Bobsleigh" "Bobsleigh"
## [1501] "Cross-Country Skiing" "Cross-Country Skiing"
## [1503] "Cross-Country Skiing" "Cross-Country Skiing"
## [1505] "Curling" "Curling"
## [1507] "Curling" "Curling"
## [1509] "Curling" "Curling"
## [1511] "Curling" "Curling"
## [1513] "Curling" "Curling"
## [1515] "Curling" "Curling"
## [1517] "Curling" "Curling"
## [1519] "Curling" "Curling"
## [1521] "Curling" "Curling"
## [1523] "Curling" "Curling"
## [1525] "Curling" "Curling"
## [1527] "Curling" "Curling"
## [1529] "Curling" "Curling"
## [1531] "Curling" "Curling"
## [1533] "Curling" "Curling"
## [1535] "Curling" "Curling"
## [1537] "Figure Skating" "Figure Skating"
## [1539] "Freestyle Skiing" "Freestyle Skiing"
## [1541] "Freestyle Skiing" "Freestyle Skiing"
## [1543] "Freestyle Skiing" "Freestyle Skiing"
## [1545] "Freestyle Skiing" "Freestyle Skiing"
## [1547] "Freestyle Skiing" "Freestyle Skiing"
## [1549] "Freestyle Skiing" "Freestyle Skiing"
## [1551] "Freestyle Skiing" "Freestyle Skiing"
## [1553] "Freestyle Skiing" "Ice Hockey"
## [1555] "Ice Hockey" "Ice Hockey"
## [1557] "Ice Hockey" "Ice Hockey"
## [1559] "Ice Hockey" "Ice Hockey"
## [1561] "Ice Hockey" "Ice Hockey"
## [1563] "Ice Hockey" "Nordic Combined"
## [1565] "Nordic Combined" "Nordic Combined"
## [1567] "Nordic Combined" "Nordic Combined"
## [1569] "Nordic Combined" "Nordic Combined"
## [1571] "Short Track Speed Skating" "Short Track Speed Skating"
## [1573] "Short Track Speed Skating" "Short Track Speed Skating"
## [1575] "Short Track Speed Skating" "Short Track Speed Skating"
## [1577] "Ski Mountaineering" "Ski Mountaineering"
## [1579] "Ski Mountaineering" "Ski Mountaineering"
## [1581] "Ski Mountaineering" "Ski Mountaineering"
## [1583] "Snowboard" "Snowboard"
## [1585] "Snowboard" "Snowboard"
## [1587] "Snowboard" "Snowboard"
## [1589] "Speed Skating" "Speed Skating"
## [1591] "Speed Skating" "Speed Skating"
## [1593] "Speed Skating" "Speed Skating"
## [1595] "Speed Skating" "Speed Skating"
## [1597] "Speed Skating" "Speed Skating"
## [1599] "Speed Skating" "Alpine Skiing"
## [1601] "Alpine Skiing" "Biathlon"
## [1603] "Biathlon" "Bobsleigh"
## [1605] "Bobsleigh" "Bobsleigh"
## [1607] "Bobsleigh" "Bobsleigh"
## [1609] "Bobsleigh" "Bobsleigh"
## [1611] "Bobsleigh" "Bobsleigh"
## [1613] "Bobsleigh" "Bobsleigh"
## [1615] "Bobsleigh" "Cross-Country Skiing"
## [1617] "Cross-Country Skiing" "Cross-Country Skiing"
## [1619] "Cross-Country Skiing" "Curling"
## [1621] "Curling" "Curling"
## [1623] "Curling" "Curling"
## [1625] "Curling" "Curling"
## [1627] "Curling" "Curling"
## [1629] "Curling" "Curling"
## [1631] "Curling" "Curling"
## [1633] "Curling" "Curling"
## [1635] "Curling" "Curling"
## [1637] "Curling" "Curling"
## [1639] "Curling" "Curling"
## [1641] "Curling" "Curling"
## [1643] "Curling" "Figure Skating"
## [1645] "Freestyle Skiing" "Freestyle Skiing"
## [1647] "Freestyle Skiing" "Freestyle Skiing"
## [1649] "Freestyle Skiing" "Freestyle Skiing"
## [1651] "Freestyle Skiing" "Freestyle Skiing"
## [1653] "Freestyle Skiing" "Freestyle Skiing"
## [1655] "Freestyle Skiing" "Freestyle Skiing"
## [1657] "Freestyle Skiing" "Freestyle Skiing"
## [1659] "Freestyle Skiing" "Freestyle Skiing"
## [1661] "Freestyle Skiing" "Ice Hockey"
## [1663] "Ice Hockey" "Ice Hockey"
## [1665] "Ice Hockey" "Ice Hockey"
## [1667] "Ice Hockey" "Ice Hockey"
## [1669] "Ice Hockey" "Nordic Combined"
## [1671] "Nordic Combined" "Nordic Combined"
## [1673] "Nordic Combined" "Short Track Speed Skating"
## [1675] "Short Track Speed Skating" "Short Track Speed Skating"
## [1677] "Short Track Speed Skating" "Short Track Speed Skating"
## [1679] "Short Track Speed Skating" "Short Track Speed Skating"
## [1681] "Short Track Speed Skating" "Short Track Speed Skating"
## [1683] "Short Track Speed Skating" "Short Track Speed Skating"
## [1685] "Short Track Speed Skating" "Ski Mountaineering"
## [1687] "Ski Mountaineering" "Ski Mountaineering"
## [1689] "Ski Mountaineering" "Ski Mountaineering"
## [1691] "Ski Mountaineering" "Snowboard"
## [1693] "Snowboard" "Snowboard"
## [1695] "Speed Skating" "Speed Skating"
## [1697] "Biathlon" "Biathlon"
## [1699] "Bobsleigh" "Bobsleigh"
## [1701] "Bobsleigh" "Bobsleigh"
## [1703] "Bobsleigh" "Bobsleigh"
## [1705] "Bobsleigh" "Bobsleigh"
## [1707] "Bobsleigh" "Bobsleigh"
## [1709] "Bobsleigh" "Bobsleigh"
## [1711] "Cross-Country Skiing" "Curling"
## [1713] "Curling" "Curling"
## [1715] "Curling" "Curling"
## [1717] "Curling" "Curling"
## [1719] "Curling" "Curling"
## [1721] "Curling" "Curling"
## [1723] "Curling" "Curling"
## [1725] "Curling" "Curling"
## [1727] "Figure Skating" "Freestyle Skiing"
## [1729] "Freestyle Skiing" "Freestyle Skiing"
## [1731] "Freestyle Skiing" "Freestyle Skiing"
## [1733] "Freestyle Skiing" "Freestyle Skiing"
## [1735] "Freestyle Skiing" "Freestyle Skiing"
## [1737] "Freestyle Skiing" "Freestyle Skiing"
## [1739] "Freestyle Skiing" "Freestyle Skiing"
## [1741] "Freestyle Skiing" "Freestyle Skiing"
## [1743] "Freestyle Skiing" "Freestyle Skiing"
## [1745] "Freestyle Skiing" "Freestyle Skiing"
## [1747] "Freestyle Skiing" "Freestyle Skiing"
## [1749] "Freestyle Skiing" "Freestyle Skiing"
## [1751] "Freestyle Skiing" "Freestyle Skiing"
## [1753] "Freestyle Skiing" "Ice Hockey"
## [1755] "Ice Hockey" "Ice Hockey"
## [1757] "Ice Hockey" "Ice Hockey"
## [1759] "Nordic Combined" "Nordic Combined"
## [1761] "Nordic Combined" "Short Track Speed Skating"
## [1763] "Short Track Speed Skating" "Short Track Speed Skating"
## [1765] "Short Track Speed Skating" "Short Track Speed Skating"
## [1767] "Short Track Speed Skating" "Ski Mountaineering"
## [1769] "Ski Mountaineering" "Ski Mountaineering"
## [1771] "Ski Mountaineering" "Ski Mountaineering"
## [1773] "Ski Mountaineering" "Ski Mountaineering"
## [1775] "Speed Skating" "Speed Skating"
## [1777] "Speed Skating" "Speed Skating"
## [1779] "Speed Skating" "Speed Skating"
## [1781] "Biathlon" "Biathlon"
## [1783] "Bobsleigh" "Bobsleigh"
## [1785] "Bobsleigh" "Bobsleigh"
## [1787] "Bobsleigh" "Bobsleigh"
## [1789] "Bobsleigh" "Bobsleigh"
## [1791] "Bobsleigh" "Bobsleigh"
## [1793] "Cross-Country Skiing" "Cross-Country Skiing"
## [1795] "Curling" "Curling"
## [1797] "Curling" "Curling"
## [1799] "Curling" "Curling"
## [1801] "Freestyle Skiing" "Freestyle Skiing"
## [1803] "Freestyle Skiing" "Freestyle Skiing"
## [1805] "Freestyle Skiing" "Freestyle Skiing"
## [1807] "Freestyle Skiing" "Freestyle Skiing"
## [1809] "Freestyle Skiing" "Freestyle Skiing"
## [1811] "Freestyle Skiing" "Freestyle Skiing"
## [1813] "Freestyle Skiing" "Freestyle Skiing"
## [1815] "Freestyle Skiing" "Freestyle Skiing"
## [1817] "Freestyle Skiing" "Freestyle Skiing"
## [1819] "Freestyle Skiing" "Freestyle Skiing"
## [1821] "Ice Hockey" "Ice Hockey"
## [1823] "Ice Hockey" "Ice Hockey"
## [1825] "Short Track Speed Skating" "Short Track Speed Skating"
## [1827] "Short Track Speed Skating" "Short Track Speed Skating"
## [1829] "Short Track Speed Skating" "Short Track Speed Skating"
## [1831] "Ski Mountaineering" "Speed Skating"
## [1833] "Speed Skating" "Speed Skating"
## [1835] "Speed Skating" "Speed Skating"
## [1837] "Biathlon" "Bobsleigh"
## [1839] "Bobsleigh" "Bobsleigh"
## [1841] "Bobsleigh" "Bobsleigh"
## [1843] "Bobsleigh" "Cross-Country Skiing"
## [1845] "Cross-Country Skiing" "Curling"
## [1847] "Curling" "Curling"
## [1849] "Freestyle Skiing" "Freestyle Skiing"
## [1851] "Freestyle Skiing" "Freestyle Skiing"
## [1853] "Freestyle Skiing" "Freestyle Skiing"
## [1855] "Freestyle Skiing" "Freestyle Skiing"
## [1857] "Freestyle Skiing" "Freestyle Skiing"
## [1859] "Freestyle Skiing" "Ice Hockey"
## [1861] "Ice Hockey" "Ski Mountaineering"
## [1863] "Speed Skating" "Speed Skating"
## [1865] "Speed Skating" "Speed Skating"str_detect(schedule$discipline_name, "Curling")## [1] FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [13] TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [25] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [37] FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [49] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE
## [61] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [73] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [85] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [97] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [109] TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE
## [121] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [133] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [145] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [157] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE
## [169] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [181] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [193] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [205] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [217] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [229] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [241] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [253] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [265] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [277] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [289] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [301] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [313] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [325] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [337] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [349] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [361] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [373] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [385] FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [397] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE
## [409] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [421] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [433] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [445] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [457] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [469] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [481] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [493] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [505] FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [517] TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [529] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [541] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [553] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [565] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [577] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [589] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [601] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [613] FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE
## [625] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE
## [637] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [649] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [661] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [673] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [685] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [697] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [709] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [721] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [733] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [745] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [757] TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [769] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [781] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [793] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [805] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [817] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [829] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [841] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [853] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [865] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [877] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [889] TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [901] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [913] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [925] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [937] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [949] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [961] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [973] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [985] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [997] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1009] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1021] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE
## [1033] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1045] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1057] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1069] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1081] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1093] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1105] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1117] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1129] FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1141] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1153] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE
## [1165] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1177] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1189] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1201] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1213] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1225] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1237] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1249] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE
## [1261] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1273] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1285] TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1297] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1309] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1321] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1333] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1345] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1357] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1369] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1381] FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE
## [1393] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1405] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1417] TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1429] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1441] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1453] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1465] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1477] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1489] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1501] FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1513] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1525] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1537] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1549] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1561] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1573] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1585] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1597] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1609] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [1621] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
## [1633] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE
## [1645] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1657] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1669] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1681] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1693] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1705] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE
## [1717] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE
## [1729] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1741] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1753] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1765] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1777] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1789] FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE TRUE TRUE TRUE
## [1801] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1813] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1825] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1837] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE TRUE TRUE
## [1849] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1861] FALSE FALSE FALSE FALSE FALSE FALSEsum(str_detect(schedule$discipline_name, "Curling"))## [1] 436schedule %>%
summarise(num_Curling = sum(str_detect(discipline_name, "Curling")))## # A tibble: 1 × 1
## num_Curling
## <int>
## 1 436schedule %>%
mutate(col_Curling = str_extract(discipline_name, "Curling")) %>%
select(discipline_name, col_Curling) %>%
filter(!is.na(col_Curling))## # A tibble: 436 × 2
## discipline_name col_Curling
## <chr> <chr>
## 1 Curling Curling
## 2 Curling Curling
## 3 Curling Curling
## 4 Curling Curling
## 5 Curling Curling
## 6 Curling Curling
## 7 Curling Curling
## 8 Curling Curling
## 9 Curling Curling
## 10 Curling Curling
## # ℹ 426 more rowsschedule %>%
mutate(col_Alpine_Skiing = str_replace(discipline_name, "Curling", "Alpine Skiing")) %>%
select(discipline_name, col_Alpine_Skiing)## # A tibble: 1,866 × 2
## discipline_name col_Alpine_Skiing
## <chr> <chr>
## 1 Alpine Skiing Alpine Skiing
## 2 Alpine Skiing Alpine Skiing
## 3 Alpine Skiing Alpine Skiing
## 4 Curling Alpine Skiing
## 5 Curling Alpine Skiing
## 6 Curling Alpine Skiing
## 7 Curling Alpine Skiing
## 8 Curling Alpine Skiing
## 9 Curling Alpine Skiing
## 10 Curling Alpine Skiing
## # ℹ 1,856 more rows