R-Shiny 应用中的重音标记

Question

我是 shiny 的新手，我正在尝试输入 html 标签以添加一些 header 文本，但包含重音符号的单词（在西班牙语中很常见）会导致错误。例如，下面的代码产生了我想要的：

library(shiny)
ui <- fluidPage(

  titlePanel("Titles"),
    sidebarLayout(
      sidebarPanel(  
        tagList(tags$h4("Geological Survey of Colombia"),
                tags$h2("Analitic Geochemistry Group"),
                tags$p("Text here"))),

    # Main panel for displaying outputs ----
    mainPanel()
    )
    )
server <- function(input, output) {}
shinyApp(ui, server)

但是将 tags$h4("Geological Survey of Colombia") 更改为 tags$h4("Servicio Geológico Colombiano") 会导致错误：

 Warning in checkEncoding(file) :   The input file
 C:\Users\cparedes\Documents\Shiny\test/app.R does not seem to be
 encoded in UTF8 Warning in readLines(file, warn = FALSE) :   invalid
 input found on input connection
 'C:\Users\cparedes\Documents\Shiny\test/app.R' Error in parse(file,
 keep.source = FALSE, srcfile = src, encoding = enc) :   
 C:\Users\cparedes\Documents\Shiny\test/app.R:7:25: unexpected
 INCOMPLETE_STRING 6:       sidebarPanel(   7:        
 tagList(tags$h4("Servicio Geol
                            ^ Error in sourceUTF8(fullpath, envir = new.env(parent = globalenv())) :    Error sourcing
 C:\Users\cparedes\AppData\Local\Temp\RtmpOwSrGa\file132427ca68ec

如何包含重音符号？

Answer 1

您可以使用 "Save with encoding" 您的 UTF-8 文件来解决这个问题。我在重音符号方面遇到了同样的问题并使用了本指南 https://shiny.rstudio.com/articles/unicode.html

R-Shiny 应用中的重音标记

Accent mark in R-Shiny app

r

shiny

accent-sensitive