0

学习闪亮的模块，我遇到了一个问题：在我的“非模块化”应用程序上，我读取了一个 csv 并对其进行了一些管理，包括：

1    haver<- read.csv("W:\\NetBakData\\Line5-7-9.csv",
2                          sep = ";",
3                          dec = ",")
4    haver$"Référence"<-as.character(haver$"Référence")
5    haver$OP<-as.character(haver$OP)

那行得通，但是当我在模块中放入相同的代码时，第 4 行使我出错：

70：停止

69: $<-.data.frame

67：反应：haver_all [testmodulelecture.R#33]

51：哈弗全部

我停用了这个 ligne 4 并且效果很好，因为你可以看到 ligne 5 做同样的工作，但 DF col 名称不包含特殊字符“é”

我不知道为什么这在“非模块化”而不是在模块中可以。

有模块：


# Function for module UI
testmodulelectureUI <- function(id) {
  ns <- NS(id)
  
  fluidPage(verbatimTextOutput(ns("out"))
  )
}

# Function for module server logic
testmodulelecture <- function(input, output, session) {
  ns <- session$ns
  toReturn <- reactiveValues(
    haver_all = NULL
  )
  

  haver_all <- reactive({
    haver<- read.csv("W:\\NetBakData\\Line5-7-9.csv", 
                    sep = ";",
                    dec = ",")
    haver$"Référence"<-as.character(haver$"Référence")
    haver$OP<-as.character(haver$OP)
    haver_all<-as.data.frame(haver_all)
  })
  toReturn$haver_all<-haver_all()
  return(toReturn)
  
}

模块对我来说太新了，我必须在模块中声明包或其他东西才能正常工作吗？尝试希望新打开的 rstudio 会话并且没有加载它的库。

任何想法？谢谢

更新：它适用于：
haver<- data.table::fread("W:\NetBakData\ 但为什么不与 read.csv 一起使用？

更新 2：以 UTF-8 编码的服务器和 UTF-8 中的模块不起作用 UTF-8 中的服务器和 ISO-8859-1 中的模块与 read.csv 一起工作太奇怪了。

4

0 回答 0