AMcoder - javascript, python, java, html, php, sql

Հատուկ թերթիկի ընթերցում read_excel-ում Shiny հավելվածում

Ես ստեղծում եմ Shiny հավելված, որը վերցնում է Excel ֆայլ և ավտոմատ կերպով շահարկում տվյալները: Ես ուզում եմ, որ օգտատերը մուտքագրի հատուկ Excel-ի թերթի անունը, որը նա ցանկանում է նայել: Ես դժվարանում եմ գտնել textInput-ը UI-ում և մուտքագրել $filesheet-ը սերվերում դրա համար: Իմ կոդը կարող է օգնել ավելի հասկանալի դարձնել այս խնդիրը.

UI

fileInput('file1', 'Insert File',
            accept = c(".xlsx"),
textInput('file1sheet','Name of Sheet (Case-Sensitive)')

ՍԵՐՎԵՐ

inFile1 <- input$file1
sheetname1 <- input$file1sheet
df1 <- read_excel(inFile1$datapath,sheet = sheetname1)

Խնդիրն այն է, որ sheetname1-ը կարծես թե չի աշխատում, քանի որ read_excel-ը այն չի ճանաչում որպես ճիշտ արտահայտություն: Ես փորձել եմ մի քանի բան, այդ թվում՝ ShQuote և as.character: Եթե ​​որևէ մեկն ունի դրա լուծումը, դա հիանալի կլինի:

Շնորհակալություն

Ստեֆան

shiny
28.02.2018

  • դուք պետք է ներկայացնեք ամբողջական վերարտադրվող օրինակ: 28.02.2018

Պատասխանները:


1

Ես փորձել եմ հասկանալ, թե ինչ էիք փնտրում, և չկարողացա վերարտադրել ձեր սխալը: Բայց միգուցե դուք կարող եք դիտել հետևյալ կոդը՝ տեսնելու, թե որտեղ է ձեր կոդը ձախողվում: Հետևյալ հավելվածը թույլ է տալիս օգտվողին ընտրել .xlsx ֆայլ, այնուհետև առբերում է թերթերի անունները՝ նախքան համապատասխան աղյուսակը ցուցադրելը:

library(shiny)
library(readxl)

ui <- fluidPage(
  fileInput('file1', 'Insert File', accept = c(".xlsx")),
  textInput('file1sheet','Name of Sheet (Case-Sensitive)'),
  tableOutput("value")
)

server <- function(input, output) {

  sheets_name <- reactive({
    if (!is.null(input$file1)) {
      return(excel_sheets(path = input$file1$datapath))  
    } else {
      return(NULL)
    }
  })

  output$value <- renderTable({
    if (!is.null(input$file1) && 
        (input$file1sheet %in% sheets_name())) {
      return(read_excel(input$file1$datapath, 
                        sheet = input$file1sheet))
    } else {
      return(NULL)
    }
  })
}

shinyApp(ui, server)
28.02.2018
Նոր նյութեր
Օգտագործելով Fetch Vs Axios.Js-ը՝ HTTP հարցումներ կատարելու համար
JavaScript-ը կարող է ցանցային հարցումներ ուղարկել սերվեր և բեռնել նոր տեղեկատվություն, երբ դա անհրաժեշտ լինի: Օրինակ, մենք կարող ենք օգտագործել ցանցային հարցումը պատվեր ներկայացնելու,..
Տիրապետել հանգստության արվեստին. մշակողի ուղեցույց՝ ճնշման տակ ծաղկելու համար
Տիրապետել հանգստության արվեստին. մշակողի ուղեցույց՝ ճնշման տակ ծաղկելու համար Ինչպե՞ս հանգստացնել ձեր միտքը և աշխատեցնել ձեր պրոցեսորը: Ինչպես մնալ հանգիստ և զարգանալ ճնշման տակ...
Մեքենայի ուսուցում բանկային և ֆինանսների ոլորտում
Բարդ, խելացի անվտանգության համակարգերը և հաճախորդների սպասարկման պարզեցված ծառայությունները բիզնեսի հաջողության բանալին են: Ֆինանսական հաստատությունները, մասնավորապես, պետք է առաջ մնան կորի..
Ես AI-ին հարցրի կյանքի իմաստը, այն ինչ ասում էր, ցնցող էր:
Այն պահից ի վեր, երբ ես իմացա Արհեստական ​​ինտելեկտի մասին, ես հիացած էի այն բանով, թե ինչպես է այն կարողանում հասկանալ մարդկային նորմալ տեքստը, և այն կարող է առաջացնել իր սեփական արձագանքը դրա..
Ինչպես սովորել կոդավորումը Python-ում վագրի պես:
Սովորելու համար ծրագրավորման նոր լեզու ընտրելը բարդ է: Անկախ նրանից, թե դուք սկսնակ եք, թե առաջադեմ, դա օգնում է իմանալ, թե ինչ թեմաներ պետք է սովորել: Ծրագրավորման լեզվի հիմունքները, դրա..
C++-ի օրական բիթ(ե) | Ամենաերկար պալինդրոմային ենթաշարը
C++ #198-ի ամենօրյա բիթ(ե), Ընդհանուր հարցազրույցի խնդիր. Ամենաերկար պալինդրոմային ենթատող: Այսօր մենք կանդրադառնանք հարցազրույցի ընդհանուր խնդրին. Ամենաերկար palindromic substring...
Kydavra ICAReducer՝ ձեր տվյալների ծավալայինությունը նվազեցնելու համար
Ի՞նչ է ICAReducer-ը: ICAReducer-ն աշխատում է հետևյալ կերպ. այն նվազեցնում է նրանց միջև բարձր փոխկապակցված հատկանիշները մինչև մեկ սյունակ: Բավականին նման է PCAreducer-ին, չնայած այն..