Commit 811c8b90 authored by wuzekai's avatar wuzekai

update

parent d72d0476
...@@ -22,6 +22,7 @@ RUN R -e "remotes::install_local('/srv/shiny-server/radiant.quickgen',dependenci ...@@ -22,6 +22,7 @@ RUN R -e "remotes::install_local('/srv/shiny-server/radiant.quickgen',dependenci
RUN R -e "remotes::install_local('/srv/shiny-server/radiant-master',dependencies=TRUE, type='source', upgrade='never',force=TRUE)" RUN R -e "remotes::install_local('/srv/shiny-server/radiant-master',dependencies=TRUE, type='source', upgrade='never',force=TRUE)"
WORKDIR /data WORKDIR /data
RUN R -e "load('/data/test.state.rda')"
CMD ["R", "-e", "radiant::radiant(host='0.0.0.0', port=3838)"] CMD ["R", "-e", "radiant::radiant(host='0.0.0.0', port=3838)"]
#docker images | grep radiant 查看镜像 #docker images | grep radiant 查看镜像
......
...@@ -50,7 +50,6 @@ coxp_plot_inputs <- reactive({ ...@@ -50,7 +50,6 @@ coxp_plot_inputs <- reactive({
# 2. 处理 incl 参数 (用于 coef) # 2. 处理 incl 参数 (用于 coef)
if (input$coxp_plots == "coef") { if (input$coxp_plots == "coef") {
args$incl <- input$coxp_incl args$incl <- input$coxp_incl
args$intercept <- input$coxp_intercept
} }
# 3. 处理 lines 参数 (用于 martingale) # 3. 处理 lines 参数 (用于 martingale)
...@@ -199,6 +198,10 @@ output$ui_coxp <- renderUI({ ...@@ -199,6 +198,10 @@ output$ui_coxp <- renderUI({
condition = "input.tabs_coxp == 'Plot'", condition = "input.tabs_coxp == 'Plot'",
selectInput("coxp_plots", i18n$t("Plots:"), choices = coxp_plots, selectInput("coxp_plots", i18n$t("Plots:"), choices = coxp_plots,
selected = state_single("coxp_plots", coxp_plots)), selected = state_single("coxp_plots", coxp_plots)),
conditionalPanel(
condition = "input.coxp_plots == 'coef'",
uiOutput("ui_coxp_incl")
),
conditionalPanel( conditionalPanel(
condition = "input.coxp_plots == 'martingale'", condition = "input.coxp_plots == 'martingale'",
checkboxGroupInput( checkboxGroupInput(
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment