Fixing cropped Kable image in R

Question

I have the following table using kableExtra in R

library(tidyverse)
library(kableExtra)

sr <- c(\'Positive (+)\',\'Positive (+)\',\'Negative (-)\