R Shiny - 选项卡面板显示意外的＆＃34; TRUE＆＃34;信息

Question

我在tabsetPanel图层中获取R脚本时遇到问题：

ui <- fluidPage(
 titlePanel("Open Medic"),

 tabsetPanel(type = "tabs",
              tabPanel("Tab1", source("src/ui/1-tab1_ui.R"))                   
               ))

server <- function(input, output, session) {
  source("src/server/1-myserver.R", local = T)
}

此代码始终显示＆＃34; TRUE＆＃34;信息。如果我不使用＆＃34;来源＆＃34;我不会有任何问题。指令。

结果可以在那里看到：

Problem with shiny tabs

编辑： 1-tab1_ui.R内容如下所示：

 mainPanel(  helpText("Here is the problematic message :") )

虽然server.R实际上是一个空的＆＃34;玩具＆＃34;文件