117: Kansas and UNC

Load data from sports-reference

library(cbbplotR)
library(rlang)

ku <- readr:::read_csv("ku-unc.csv")

GT table

ku_gt <- ku |> 
  dplyr::select(Date, Location, Winner, Result, Type, Order) |> 
  cbbplotR::gt_cbb_teams(Winner, Winner, include_name = FALSE) |> 
  dplyr::group_by(Type) |> 
  dplyr::arrange(Order) |> 
  gt::gt() |> 
  gt::cols_hide(Order) |> 
  gtUtils::gt_theme_gtutils() |> 
  gt::fmt_markdown(Winner) |>
  gtExtras::gt_merge_stack(
    col1 = "Date",
    col2 = "Location",
    palette = c("black", "#848484"),
    small_cap = FALSE
  ) |> 
  gtExtras::gt_add_divider(columns = c(Location),
                           sides = "right",
                           color = "black") |>
  gt::cols_align(columns = c(Date, Location, Result),
                 align = "left") |> 
  gt::tab_header(title = gt::html("Stakes is high for <span style='color:#56a0d3'>North Carolina</span> when it plays <span style='color:#E8000D'>Kansas</span>"),
                 subtitle = gt::html("The two teams have met seven times in the NCAA Tournament and 12 times overall since the 1957 season. The overall series is tied 6-6.<br>
                                     Carolina plays its first game at Allen Fieldhouse on Friday since 1960.")) |>
  gt::tab_source_note(
    source_note =
      gt::html(
        "<hr>Data from Stathead and sports-reference.com, theme via {gtUtils}<hr>
        <b>Table by Chris at Bless your chart</b>"
      )
  ) |>
  gt::cols_label(
    Date = "",
    Winner = "",
    Result = "",
  ) |> 
  gt::tab_style(
    locations = gt::cells_column_spanners(),
    style = gt::cell_text(
      font = gt::google_font("Signika Negative"),
      weight = 850,
      size = gt::px(15)
    )
  ) |>
  gt::tab_style(
    locations = gt::cells_row_groups(),
    style = list(
      gt::cell_text(
        font = gt::google_font("Signika Negative"),
        weight = 850,
        size = gt::px(16),
        color = "black",
        align = "left"
      ),
      gt::cell_fill(
        color = "#C5C5FF"
      )
    )
  ) |> 
  gt::tab_style(
    locations = gt::cells_source_notes(),
    style = gt::cell_text(
      font = gt::google_font("Signika Negative"),
      size = gt::px(11.5),
      weight = 250
    )
  ) |>
  gt::tab_style(
    style = list(
      gt::cell_text(font = gt::google_font("Signika Negative")
      )
    ),
    locations = gt::cells_body(
      columns = c(Date, Location, Result)
    )
  ) |> 
  gt::tab_options(table.width = gt::px(500)) |> 
  gt::tab_style(
    style = list(
      gt::cell_text(font = gt::google_font("Signika Negative"),
                    color = "#E8000D"
      )
    ),
    locations = gt::cells_body(
      columns = c(Result),
      rows = c(1, 3, 5, 6, 7, 10)
    )
  ) |> 
  gt::tab_style(
    style = list(
      gt::cell_text(font = gt::google_font("Signika Negative"),
                    color = "#56a0d3"
      )
    ),
    locations = gt::cells_body(
      columns = c(Result),
      rows = c(2, 4, 8, 9, 11, 12)
    )
  ) |> 
  gtUtils::gt_border_bars_bottom(c("#56a0d3", "#89BDE0", "#BBD9ED")) 

gtUtils::gt_save_crop(
  ku_gt,
  file = "ku_gt.png",
  whitespace = 30,
  bg = "#FFFDF5"
)

ku_gt

Stakes is high for North Carolina when it plays Kansas
The two teams have met seven times in the NCAA Tournament and 12 times overall since the 1957 season. The overall series is tied 6-6. Carolina plays its first game at Allen Fieldhouse on Friday since 1960.
NCAA Final
April 4, 2022 New Orleans, Lousiana		L 69-72
March 23, 1957 Kansas City, Missouri		W 54-53 (3OT)
NCAA Semifinal
April 5, 2008 San Antonio, Texas		L 66-84
April 3, 1993 New Orleans, Lousiana		W 78-68
March 30, 1991 Indianapolis, Indiana		L 73-79
NCAA Elite Eight
March 25, 2012 St. Louis, Missouri		L 67-80
NCAA Second Round
March 23, 2013 Kansas City, Missouri		L 58-70
Non-Conference
November 27, 2002 MSG (New York)		W 67-56
November 28, 1981 Charlotte, North Carolina		W 74-67
January 3, 1981 Kansas City, Missouri		L 55-56
December 17, 1960 Lawrence, Kansas		W 78-70
December 11, 1959 Raleigh, North Carolina		W 60-49
Data from Stathead and sports-reference.com, theme via {gtUtils} Table by Chris at Bless your chart