shiny-reactivity

    1热度

    1回答

    在数据表中,根据是否选择相应的行,某些值应该会更改。让我头疼的是:当数据更新时,表格被重写,选择消失。 我一直在处理这个挑战几个小时,但还没有遇到一个解决方案。大多数时候我在stackoverflow找到解决我的问题的解决方案,但这次我没有。 在下面的例子中,最后一列应该显示行的选择状态。我试图跟踪选定的行,并在表重写时预先选择它们。但我无法弄清楚如何使它工作。该代码不起作用,但(希望)显示我需要

    0热度

    1回答

    如何从even_data信息中检索用于绘图的原始数据? library(plotly) library(shiny) ui <- fluidPage( plotlyOutput("plot"), verbatimTextOutput("click") ) server <- function(input, output, session) { output

    1热度

    1回答

    我正在创建一个反应灵敏的应用程序,它有几个numericInput变量和一些selectInput变量。 由于变量相当多,它们用于估计干预措施,所以我引入了颜色来表示与默认设置不同的变量。我已经在@BigDataScientist的this问题的帮助下实现了这个。一个MWE提出: library(shiny) library(shinyjs) ui<-shinyUI( fluidPag

    0热度

    1回答

    闪亮的更新情节在我的示例应用程序我有用户给一些输入,并在第一个选项卡中从它生成一个data.table。在第二个选项卡中,我想显示该图,具体取决于data.table。我很难获得正确的反应性。不幸的是在这一点上,我得到了error: Operation not allowed without an active reactive context. 请帮助我或给我提示我做错了什么。 数据: tdat

    1热度

    2回答

    我在Shiny中遇到反应性问题。在我的用户界面,我有 library(tidyverse) library(shiny) library(forcats) ui <- fluidPage( titlePanel(h1("Percent Cover")), selectInput("selectInput", "Select Site", choices = c("A"

    0热度

    1回答

    我对没有一个特定的可重复的例子表示歉意,我希望我的问题不是太通用。 我想知道是否有可能使用reactiveValues()来删除plotOutput对象。特别是,我可以有类似的东西 my_values <- reactiveValues(A = my_plot, B = [something]) if (condition) { output$my_plotOutput <- my

    0热度

    1回答

    在我的Shiny应用程序中,我有一个名为bob的selectInput,在我的用户界面中选择了“A”,“B”,“C”。 在我的服务器(其它任何操作之前)的顶部我 observe({ bob_value <- reactive({ if (input$bob == "A") {bob_value <- "A" } else if (input$bob ==

    0热度

    1回答

    所以基本上我正在尝试做一些排序的小设置,并且一旦完成了特定的分析,我想将某个数据集导出到预定义的位置和预定义的名称(基于之前选择的输入)。为此,我使用了动作按钮,点击时这样做, observeEvent(input$export_button, { write.csv(input_dummy_data4ads,paste0("Dummy Files/",unique(input_dum

    0热度

    1回答

    我想要做的是使得for循环运行的输出可用于Shiny App中的许多渲染输出。 我创建了我的问题的简单例子。 每个renderPrint()函数中的循环都是一样的。 我可以用这种方式编写代码,以便for循环移出render *()函数之外吗? 我发现了一些例子说明如何在循环中使用反应物,但还没有找到解决逆向任务的方法。 谢谢你的帮助和关注。 library(shiny) ui <- f

    0热度

    1回答

    我正尝试使用我的同事创建的一些函数创建Shiny应用程序。他经常在他的函数中使用'< <'运算符来创建全局对象。 问题: 1.在这种情况下使用< <是否是一个好习惯? 2.如果我使用reactive()来表示对象,该应用会更快吗? 3.有什么更好的建议? 这是他写的函数的例子: PrepareData<-function(pickoneperday=TRUE,data) { set.se