Sys.info()未显示在仪表板主体框中

时间:2016-08-08 02:39:28

标签: r shiny

我正在尝试在框()内显示Sys.info()的输出,但它显示的只是一个单词“Darwin”。

如果我str(Sys.info())

Named chr [1:8] "Darwin" "15.5.0" ...
 - attr(*, "names")= chr [1:8] "sysname" "release" "version" "nodename" ...

那么如何将其显示为框中的文本块?它应该在服务器代码中调用并显示在textOutput中吗?

这是dashboardBody代码块,它位于ui.R中,位于shinyUI(dashboardPage(...))中:

dashboardBody(
    fluidRow(
        box(
            title = "Time and Date", 
            status = "primary", 
            solidHeader = TRUE, width = 4,
            "Time: ", Sys.time(), br(),
            "Date: ", Sys.Date(), br(),
            "Time Zone: ", Sys.timezone(), br(),
            Sys.info(), br()
        )
    )
)

server.R只是空的:

shinyServer(function(input, output) {

})

1 个答案:

答案 0 :(得分:3)

你看到警告了吗?

  

charToRaw中的警告(enc2utf8(text)):     参数应该是长度为1的字符向量   除了第一个元素之外的所有元素都将被忽略

请改用:

for l in unique_ll:
    df.loc[df['latlon'] == l, 'state'] = convert_to_state(l[0],l[1])