R七种武器之交互化展示包shiny

R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区R七种武器之交互化展示包shiny——第一课R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区本周内容shiny包简介shiny的两个重要脚本：ui.Rserver.R——minimalexample——helloshinyshiny的用户界面设计——布局——标题——文字——图shiny的控制小部件R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区shiny包简介Rstudio公司开发的R包利用R语言轻松开发交互式web应用shiny官网：七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区shinny包实例runExample(01_hello)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区shinny包实例runExample(02_text)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区shinny包实例runExample(03_reactivity)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区StructureofaShinyApp两个脚本ui.R与server.Rlibrary(shiny)#定义web应用的用户界面shinyUI(pageWithSidebar(#应用名称/标题headerPanel(“hello”),sidebarPanel(),mainPanel()))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区StructureofaShinyApplibrary(shiny)#定义输入与输出的关系shinyServer(function(input,output){})R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区minimalexampleui.Rlibrary(shiny)shinyUI(pageWithSidebar(headerPanel(Minimalexample),sidebarPanel(textInput(inputId=comment,label=Saysomething?,value=“)),mainPanel(h3(Thisisyousayingit),textOutput(textDisplay))))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区minimalexampleserver.Rlibrary(shiny)shinyServer(function(input,output){output$textDisplay-renderText({paste0(Yousaid',input$comment,'.Thereare,nchar(input$commentcharactersinthis.)})})R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区helloshinyR七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区布局调整pageWithSidebarfluidPage#ui.RshinyUI(fluidPage(titlePanel(titlepanel),sidebarLayout(sidebarPanel(sidebarpanel),mainPanel(mainpanel))))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区布局调整#ui.RshinyUI(fluidPage(titlePanel(titlepanel),sidebarLayout(position=“right”,sidebarPanel(sidebarpanel),mainPanel(mainpanel))))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区布局调整多页的用户界面：navbarPage网格布局：fluidRow()、colum()更多：七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区HTML5帮助函数ppAparagraphoftexth1h1Afirstlevelheaderh2h2Asecondlevelheaderh3h3Athirdlevelheaderh4h4Afourthlevelheaderh5h5Afifthlevelheaderh6h6AsixthlevelheaderaaAhyperlinkbrbrAlinebreak(e.g.ablankline)divdivAdivisionoftextwithauniformstylespanspanAnin-linedivisionoftextwithauniformstyleprepreText‘asis’inafixedwidthfontcodecodeAformattedblockofcodeimgimgAnimagestrongstrongBoldtextememItalicizedtextHTMLDirectlypassesacharacterstringasHTMLcodeR七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区标题#ui.RshinyUI(fluidPage(titlePanel(MyShinyApp),sidebarLayout(sidebarPanel(),mainPanel(h6(EpisodeIV,align=“center),h6(ANEWHOPE,align=center),h5(Itisaperiodofcivilwar.,align=center),h4(Rebelspaceships,striking,align=center),h3(fromahiddenbase,havewon,align=center),h2(theirfirstvictoryagainstthe,align=center),h1(evilGalacticEmpire.)))))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区文本格式#ui.RshinyUI(fluidPage(titlePanel(MyShinyApp),sidebarLayout(sidebarPanel(),mainPanel(p(pcreatesaparagraphoftext.Note:thisparagraphisfollowedbybr(),whichmakesablankline.),p(Anewp()commandstartsanewparagraph.Supplyastyleattributetochangetheformatoftheentireparagraph,style=font-family:'times';font-si16pt),strong(strong()makesboldtext.),em(em()createsitalicized(i.e,emphasized)text.),br(),code(codedisplaysyourtextsimilartocomputercode),div(divcreatessegmentsoftextwithasimilarstyle.ThisdivisionoftextisallbluebecauseIpassedtheargument'style=color:blue'todiv,style=color:blue),br(),p(spandoesthesamethingasdiv,butitworkswith,span(groupsofwords,style=color:blue),thatappearinsideaparagraph.)))))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区文本格式R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区图img(src=my_image.png,height=72,width=72)#ui.RshinyUI(fluidPage(titlePanel(MyShinyApp),sidebarLayout(sidebarPanel(),mainPanel(img(src=bigorb.png,height=400,width=400)))))R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区更多功能七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区综合例子R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区输入控件runGist(6571951)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区控件函数functionwidgetactionButton按钮checkboxGroupInput复选框checkboxInput单选框dateInput日期dateRangeInput日期范围fileInput上传文件helpText帮助文件numericInput数字输入radioButtons单选按钮selectInput选择栏sliderInput滑动条submitButton提交按钮textInput文本输入R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区控件函数R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区更多七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区mpg例子runExample(04_mpg)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区滑动条runExample(05_sliders)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区submit按钮runExample(07_widgets)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区选项卡面板runExample(06_tabsets)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区文件上传调整上传文件大小上限：options(shiny.maxRequestSize=30*1024^2)fileInput(inputId,label,multiple=FALSE,accept=NULL)runExample(09_upload)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区文件下载server.R:downloadHandlerui.R:downloadButtondownloadLinkrunExample(10_download)R七种武器之交互化展示包shiny讲师何翠仪DATAGURU专业数据分析社区低成本获取高端知识技术成就梦想炼数成金edu.dataguru.cnR七种武器之交互