What is wrong with this inline RMarkdown code?

[sbac]

I want to use the results of a k-s test with an inline code using RMarkdown. I can get ks$statistic[[1]] and ks$p.value[[1]] but when I use them inline, I get an error.

---
title: "ks test2"
output:
  word_document: default
---

```{r setup, include=FALSE}
library(knitr)
knitr::opts_chunk$set(echo = TRUE, results="asis")

x <- rnorm(50)
ks <- ks.test(x, "pnorm", mean=mean(x),
        sd=sd(x))
df <- length(x)

Based on K-S test (r D (df) = ks$statistic[[1]], p = ks$p.value[[1]]), we can conlude something.

[technocrat]

@sbac

( r D (df) = ks$statistic[[1]], p = ks$p.value[[1]] )

The two expressions need to be inlined separately. They work

x <- rnorm(50)
ks <- ks.test(x, "pnorm", mean=mean(x),
              sd=sd(x))
df <- length(x)

ks$statistic[[1]]
#> [1] 0.07133526
ks$p.value[[1]]
#> [1] 0.9451946

but just not when used with the surrounding non-statements

> (r D (df) = ks$statistic[[1]], p = ks$p.value[[1]])
Error: unexpected symbol in "(r D"

Based on K-S test D (df) = !r ks$statistic[[1]]!, p = !r ks$p.value[[1]]!, we can conclude something.

with backticks in place of !.