try this. It opens for me in word and I can edit the contents:
---
title: "R Notebook"
output: rtf_document
---
```{r echo=FALSE}
library(gt)
example_table <-
gtcars %>%
dplyr::select(mfr, model, msrp) %>%
dplyr::slice(1:5) %>%
gt() %>%
tab_header(
title = md("Data listing from **gtcars**"),
subtitle = md("`gtcars` is an R dataset")
)
```
```{r}
example_table
```