shiny-server

    0热度

    1回答

    我在Shiny Server Pro中运行多个闪亮的应用程序。每个应用程序都由多种类型的用户使用,它们显示的是不同的用户界面。我发现通过renderUI渲染复杂的UI元素 - 即开始会话时 - 在使用Shiny Server时非常缓慢(请参阅https://github.com/rstudio/shiny/issues/1175以解决更多用户遇到此问题)。本地 - 从RStudio - rende

    0热度

    1回答

    我有我的闪亮的工具真是奇怪的行为。 其中一个数据表输出没有出现在页面上,但是如果我重新打开并关闭ui.R文件而没有任何更改,然后重新加载该页面,则不会出现任何问题。 在ui.R这里就是我该数据表输出: fluidRow(column(width = 12,box(width =NULL,dataTableOutput("df")))) 而且在server.R: GetDB=eventReact

    0热度

    1回答

    我试图将一些rmd文件插入闪亮的仪表板。一切工作正常本地。但是,当我尝试了我的闪亮的服务器上,它显示: 警告的文件(文件,ifelse(追加, “A”, “W”)): 无法打开文件 'testing.md':权限否认 警告:错误文件:无法打开连接 它只是一个很简单的测试仪表板发亮: app.R library(shiny) library(knitr) library(shinydashboa

    0热度

    1回答

    我在Rshiny pro server(1.5.2)上部署了闪亮的应用程序。应用程序处理excel files并以word文档(包含文本内容,表格和图形)的形式生成报告(使用RMarkdown)。 成功案例:应用程序对输入数据进行了一些繁重的计算(例如:对于12个数据点),并且大约需要12个数据点。 30到45秒。这些计算发生在downloadHandler动作中。正在生成的报告的size大约在1

    -1热度

    1回答

    我已经在R中创建了一个模型,并使用闪亮的R在浏览器中打开它创建了界面。现在,所有这些都是在服务器中创建的。 我的问题是: 我如何可以分享时,我与其他人运行shinyapp是开放获取这个浏览器的URL。 我的意思是,如果我复制url并在我的服务器中的浏览器中打开它,我可以打开它。 但是,如果我尝试从本地桌面打开相同的url,我无法打开它。它不识别url。 我url就像http://10.***.**

    11热度

    1回答

    我试图设置一个闪亮的服务器。我需要更改Shiny应用程序的默认目录(以避免sudo权限)。 我改变了原来的shiny-server.conf到: #CHANGED; run_as userA; server { listen 3838; location/{ # CHANGED site_dir /home/userA/shiny-server;

    0热度

    1回答

    当我尝试连接到我的网络服务器的任何闪亮的应用程序,我收到以下错误: ERROR: cannot open the connection 我目前存储在/ SRV /闪亮的应用服务器上的服务器文件夹和该文件夹当前具有正确的读/写权限。早些时候,当我上传我的应用程序时,它运行没有问题,但我做了几处更改,当我更新文件时,我突然开始出现此错误。我尝试回滚所有更改,但错误仍然存​​在,因此最终我尝试从Sh

    2热度

    1回答

    我正在开发一个应用程序,其中我使用模块来显示不同选项卡的UI内容。然而,它看起来像模块不与主要(或父母)应用程序进行通信。它显示正确的UI,但在单击actionButton时无法执行observeEvent函数,它应更新当前选项卡并显示第二个选项卡。 在我的代码中,我创建了一个名称空间函数,并将actionButton的ID包装在ns()中,但它仍然不起作用。有谁知道什么是错的? library(

    1热度

    1回答

    我已经写了一个Hello World应用光泽如下: /local/sampleShinyApp/ui.R: library(shiny) ui <- shinyUI(fluidPage(h1('Hello World'))) /local/sampleShinyApp/server.R: library(shiny) shinyServer(function(input, output){

    0热度

    1回答

    #server tables <- reactiveValues(XVALUES=data.frame(), YVALUES=data.frame()) output$userinput <- renderDataTable({ if(input$name=="X" & input$city=="BOS" & (is.data.frame(tables$XVA