คำถามติดแท็ก shiny

ฉันกำลังพยายามสร้างแอปพลิเคชันที่เป็นประกายให้กับเพื่อนร่วมงานของฉันโดยที่พวกเขาไม่ต้องเรียกใช้หรือติดตั้ง R ดังนั้นฉันจึงอ่านหน้าเว็บนี้ และพบประโยคนี้: หากคุณคุ้นเคยกับเว็บโฮสติ้งหรือมีสิทธิ์เข้าถึงแผนกไอทีคุณสามารถโฮสต์แอป Shiny ด้วยตัวคุณเอง ภายใต้ส่วน ' แบ่งปันเป็นหน้าเว็บ ' ฉันจะทำเช่นนี้ได้อย่างไร? ปัญหาคือ บริษัท ของฉันผูกพันกับข้อ จำกัด บางประการเกี่ยวกับเว็บโฮสติ้งและความปลอดภัยเป็นต้นและจะไม่ (ในตอนนี้) จ่ายเงินให้กับเซิร์ฟเวอร์โปร แต่ประโยคข้างต้นทำให้ฉันมีความหวังที่จะสร้างบางสิ่งขึ้นมาเพื่อโน้มน้าวใจพวกเขา

98 r  web-hosting  shiny  shiny-server 

ฉันเพิ่งรู้ว่าโปรแกรม R Shiny กำหนดข้อ จำกัด ขนาดสูงสุดสำหรับการอัปโหลดไฟล์โดยค่าเริ่มต้น (ฉันไม่รู้ว่าขนาดเท่าไหร่กันแน่ แต่ฉันเดาว่ามันคือ 5,000 KB) ฉันต้องการลบข้อ จำกัด นี้ ฉันจะทำได้อย่างไรและมีกฎทั่วไปสำหรับขนาดการอัปโหลดของผู้ใช้อย่างไร นอกจากนี้สิ่งนี้อยู่ในบันทึกอื่น แต่เกี่ยวข้อง: ฉันจะบันทึกอินพุต fie โดยผู้ใช้ BY เซสชันได้อย่างไร ตัวอย่างเช่นจะมีไฟล์แจ้งในแอปพลิเคชันซึ่งผู้ใช้สามารถอัปโหลดไฟล์ได้ จากนั้นเมื่อผู้ใช้เลือกไฟล์ที่จะแสดงเขาสามารถเลือกไฟล์ต่างๆที่เขาอัปโหลดได้ หากเขาออกจากเซสชันรายการจะล้าง

95 r  shiny 

ฉันต้องการให้สองเหตุการณ์ที่แตกต่างกันเพื่อกระตุ้นการอัปเดตข้อมูลที่ใช้โดยพล็อต / เอาต์พุตต่างๆในแอปของฉัน ปุ่มหนึ่งคือปุ่มที่คลิก ( input$spec_button) และอีกปุ่มคือจุดบนจุดที่คลิก ( mainplot.click$click) โดยทั่วไปฉันต้องการแสดงรายการทั้งสองอย่างในเวลาเดียวกัน แต่ฉันไม่แน่ใจว่าจะเขียนโค้ดอย่างไร นี่คือสิ่งที่ฉันมีตอนนี้: ในเซิร์ฟเวอร์ R: data <- eventReactive({mainplot.click$click | input$spec_button}, { if(input$spec_button){ # get data relevant to the button } else { # get data relevant to the point clicked } }) แต่ประโยค if-else ไม่ทำงาน Error in mainplot.click$click | input$spec_button : …

88 r  shiny 

ฉันพยายามหาวิธีใช้ downloadButton เพื่อบันทึกพล็อตด้วยเงา ตัวอย่างในแพ็คเกจแสดงให้เห็นถึง downloadButton / downloadHandler เพื่อบันทึกไฟล์. csv ฉันจะสร้างตัวอย่างที่ทำซ้ำได้ตามนั้น สำหรับ ui.R shinyUI(pageWithSidebar( headerPanel('Downloading Data'), sidebarPanel( selectInput("dataset", "Choose a dataset:", choices = c("rock", "pressure", "cars")), downloadButton('downloadData', 'Download Data'), downloadButton('downloadPlot', 'Download Plot') ), mainPanel( plotOutput('plot') ) )) สำหรับ server.R library(ggplot2) shinyServer(function(input, output) { datasetInput <- reactive({ switch(input$dataset, "rock" = rock, "pressure" …

85 r  ggplot2  shiny 

ปัญหา เมื่อสร้างองค์ประกอบ UI แบบไดนามิก ( shiny.tag,, shiny.tag.list... ) ฉันมักจะพบว่ามันยากที่จะแยกมันออกจากตรรกะรหัสของฉันและมักจะจบลงด้วยระเบียบที่สับสนของซ้อนกันtags$div(...)ผสมกับลูปและงบเงื่อนไข แม้จะดูน่ารำคาญและน่าเกลียด แต่ก็มีข้อผิดพลาดเช่นกันเช่นเมื่อทำการเปลี่ยนแปลงกับแม่แบบ html ตัวอย่างที่ทำซ้ำได้ สมมติว่าฉันมีโครงสร้างข้อมูลต่อไปนี้: my_data <- list( container_a = list( color = "orange", height = 100, content = list( vec_a = c(type = "p", value = "impeach"), vec_b = c(type = "h1", value = "orange") ) ), container_b = list( …

9 r  shiny  templating  htmltools