r代码转换成html,R Shiny：转换成HTML UI uiOutput，htmlOutput和文件上传

我有一个Shiny应用程序，我想在现有的网站中实现，因此我需要将ui.R转换为HTML UI。我得到了大部分的来自ui.R的东西在HTML UI中工作，但我有关于uiOutput，html输出和文件上传的问题。R Shiny：转换成HTML UI uiOutput，htmlOutput和文件上传

Q1：如何实现一个动态滑块，我创建了renderUI({})？我用renderUI({})创建的动态选择工作正常，但滑块出现以下错误：min, max, amd value must all be numeric values似乎没有数值可以从HMTL UI发送到server.R。

Q2：：HMTL文件上传工作将会如何进行？我似乎上传文件，但我无法将它传递给server.R。

下面是一个例子：

server.R：

library(shiny)

#sample data

years

oryear

shinyServer(function(input, output, session) {

#Input uploaded file

inFile

#make dynamic selection

output$selectUI

selectInput("test_select", "Test selection", years, selected=oryear)

})

#make dynamic slider

output$slider

sliderInput("inSlider", "Slider", min=input$min_val, max=input$max_val, value=2000)

})

})

ui.R：

library(shiny)

shinyUI(pageWithSidebar(

headerPanel("Test Shiny App"),

sidebarPanel(

#File Upload

fileInput('ascii_layer', 'Choose ASCII Layer', multiple=FALSE, accept='asc'),

#HTML Selection Output from server.R

htmlOutput("selectUI"),

#Numeric Inputs

numericInput("min_val", "Enter Minimum Value", 1993),

numericInput("max_val", "Enter Maximum Value", 2013)

#display dynamic UI

uiOutput("slider")

),

mainPanel()

))

HMTL UI：

HTML UI

Choose Distance to Road Layer:

Enter Minimum Value:

Enter Maximum Value:

2014-01-15

viktor_r