rm_source_notes() functionUse gtcars to create a gt table. Use tab_source_note() to add a source note to the table footer that cites the data source.
gt_tbl <-
gtcars |>
dplyr::select(mfr, model, msrp) |>
dplyr::slice(1:5) |>
gt() |>
tab_source_note(source_note = "Data from the 'edmunds.com' site.") |>
tab_source_note(source_note = "Showing only the first five rows.") |>
cols_width(everything() ~ px(120))
gt_tbl| mfr | model | msrp |
|---|---|---|
| Ford | GT | 447000 |
| Ferrari | 458 Speciale | 291744 |
| Ferrari | 458 Spider | 263553 |
| Ferrari | 458 Italia | 233509 |
| Ferrari | 488 GTB | 245400 |
| Data from the 'edmunds.com' site. | ||
| Showing only the first five rows. | ||
If you decide that you don’t want the source notes in the gt_tbl object, they can be removed with the rm_source_notes() function.
| mfr | model | msrp |
|---|---|---|
| Ford | GT | 447000 |
| Ferrari | 458 Speciale | 291744 |
| Ferrari | 458 Spider | 263553 |
| Ferrari | 458 Italia | 233509 |
| Ferrari | 488 GTB | 245400 |
Individual source notes can be selectively removed. Source notes are identified by their index values. To remove the source note concerning the extent of the data (source note 2, since it was supplied to gt after the other source note) we would give the correct index value to source_notes.