Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/79.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 如何在窗口中呈现集中的文本输入并保存?客户注册示例_R_Shiny - Fatal编程技术网

R 如何在窗口中呈现集中的文本输入并保存?客户注册示例

R 如何在窗口中呈现集中的文本输入并保存?客户注册示例,r,shiny,R,Shiny,我试图通过按下按钮来打开一个窗口,写入一些文本输入并提交到MySql表,如下面的示例,但我不知道如何集中文本输入 企图 库(shinyWidgets) 图书馆(闪亮) 图书馆(shinyjs) 图书馆(RMariaDB) shinyApp( ui=fluidPage( 使用shinyjs(),#设置shinyjs 操作按钮(“btn”、“客户注册”), ), 服务器=功能(输入、输出、会话){ #连接到MySQL #localuserpassword=“PASSW” #myconnect在您的

我试图通过按下按钮来打开一个窗口,写入一些文本输入并提交到MySql表,如下面的示例,但我不知道如何集中文本输入

企图
库(shinyWidgets)
图书馆(闪亮)
图书馆(shinyjs)
图书馆(RMariaDB)
shinyApp(
ui=fluidPage(
使用shinyjs(),#设置shinyjs
操作按钮(“btn”、“客户注册”),
),
服务器=功能(输入、输出、会话){
#连接到MySQL
#localuserpassword=“PASSW”

#myconnect在您的div中包括
align='center'
,例如
text=tags$div(align='center',

textInput
如果您想更紧密地匹配示例,还可以包含占位符文本

最小工作示例

library(shinyWidgets)
library(shiny)
library(shinyjs)

shinyApp(
    
ui = fluidPage(
    useShinyjs(),
    actionButton("btn", "Costumer Registration"),
),
    
server = function(input, output,session) {

    observeEvent(input$btn, {
        
        confirmSweetAlert(
            btn_labels = c("Cancel","Submit"),
            session = session,
            inputId = "SubmitCostumertoSQL",
            type = "info",
            title = paste0("Customer Registration"),
            danger_mode = F,
            closeOnClickOutside = T,
            showCloseButton =T,
            text = tags$div(align = 'center',
                renderUI(textInput("name", "Name")),
                renderUI(textInput("NRLE", "National Registry of Legal Entities")),
                renderUI(textInput("address", "Address")),
            )
        )
        
    })

})

你说的中央集权是指这样的东西?是的,就是那样
library(shinyWidgets)
library(shiny)
library(shinyjs)

shinyApp(
    
ui = fluidPage(
    useShinyjs(),
    actionButton("btn", "Costumer Registration"),
),
    
server = function(input, output,session) {

    observeEvent(input$btn, {
        
        confirmSweetAlert(
            btn_labels = c("Cancel","Submit"),
            session = session,
            inputId = "SubmitCostumertoSQL",
            type = "info",
            title = paste0("Customer Registration"),
            danger_mode = F,
            closeOnClickOutside = T,
            showCloseButton =T,
            text = tags$div(align = 'center',
                renderUI(textInput("name", "Name")),
                renderUI(textInput("NRLE", "National Registry of Legal Entities")),
                renderUI(textInput("address", "Address")),
            )
        )
        
    })

})