Html 避免在R中连字符后换行

似乎Shining会在连字符后自动引入换行符，至少在与datatables一起使用时是这样，请参见下面的示例。我猜这与文档呈现为HTML有关，并且可能发生在文档呈现为HTML时，但是这里用一个非破坏性版本替换了连字符&8209；不起作用，用长版本替换连字符也不起作用-

下面是一个重现此问题的示例代码，我创建了一个名称中带有减号的变量，并希望在表头中显示其名称，包括减号。如您所见，在-之后会出现换行符

---

您可以使用nowrap类禁用包装：

---

您可以添加软件包和/或环境降价。。。需要吗？我对这类代码不太熟悉。我用一些可能丢失的库编辑了这篇文章，还有SessionInfo的结果。这很奇怪，因为当我将窗口设置为全屏时，没有换行符。我使用的是windows 10，您尝试过在浏览器中打开它吗？嗯，您是对的，这似乎解决了问题，即使在使用全屏视图后缩小了尺寸。但是，仍然无法理解为什么这条线会断。请注意，如果添加的新变量名称较长，则换行符与此无关，而是与连字符有关。我编辑了这个问题来说明这一点。我还不知道如何修复它，但你应该注意到，这并不是由于连字符造成的：例如，如果你用new_mpg替换-mpg，问题是sameYes！这正如预期的那样有效。调用CSS类的有趣选项。非常感谢。

---
title: "Example"
runtime: shiny
theme: simplex
vertical_layout: fill
output:
  flexdashboard::flex_dashboard:
  orientation: rows
---

Explore
======================================================================

```{r echo = FALSE}
library("tidyverse")
library("shiny")
library("DT")
```

```{r echo = FALSE}
createDataTable <- function (data) {

  data %>%  

    DT::datatable(
      extensions = c('Buttons','Scroller'),
      rownames=FALSE,
      options = list(
        paging = TRUE,
        pageLength = nrow(data),
        searching = TRUE,
        fixedColumns = TRUE,
        autoWidth = FALSE,
        ordering = TRUE,
        scroller = TRUE,
        scrollX = '400px',
        scrollY = '300px',
        dom = 'Bfrtip',
        buttons = list(
          'copy',
          list(
            extend='collection',
            buttons = list (
              list(extend='csv', filename='catalog'),
              list(extend='excel', filename='catalog'),
              list(extend='pdf', filename='catalog')
            ),
            text='Download'),
          'print'
        )
      )
    )
}
```

```{r echo = FALSE}
DT::renderDataTable(
  server=FALSE, {
  mtcars %>% dplyr::mutate(`-mpg` = -mpg, a_longer_name_for_mpg = mpg) %>% createDataTable()
})

```

R version 3.6.0 (2019-04-26)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Arch Linux

Matrix products: default
BLAS:   /usr/lib/libblas.so.3.8.0
LAPACK: /usr/lib/liblapack.so.3.8.0

locale:
 [1] LC_CTYPE=es_ES.UTF-8       LC_NUMERIC=C               LC_TIME=es_ES.UTF-8        LC_COLLATE=es_ES.UTF-8    
 [5] LC_MONETARY=es_ES.UTF-8    LC_MESSAGES=es_ES.UTF-8    LC_PAPER=es_ES.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C             LC_MEASUREMENT=es_ES.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

loaded via a namespace (and not attached):
 [1] compiler_3.6.0        rsconnect_0.8.13      htmltools_0.3.6       tools_3.6.0           flexdashboard_0.5.1.1
 [6] yaml_2.2.0            Rcpp_1.0.1            rmarkdown_1.13        knitr_1.23            jsonlite_1.6         
[11] xfun_0.7              digest_0.6.19         evaluate_0.13    

DT::datatable(
  class = "display nowrap",
  extensions = c('Buttons','Scroller'),
  ......