欢迎来到优知文库! | 帮助中心 分享价值,成长自我!
优知文库
全部分类
  • 幼儿/小学教育>
  • 中学教育>
  • 高等教育>
  • 研究生考试>
  • 外语学习>
  • 资格/认证考试>
  • 论文>
  • IT计算机>
  • 法律/法学>
  • 建筑/环境>
  • 通信/电子>
  • 医学/心理学>
  • ImageVerifierCode 换一换
    首页 优知文库 > 资源分类 > DOCX文档下载
    分享到微信 分享到微博 分享到QQ空间

    R语言_Shiny包-_学习笔记.docx

    • 资源ID:1183442       资源大小:59.19KB        全文页数:13页
    • 资源格式: DOCX        下载积分:5金币
    快捷下载 游客一键下载
    账号登录下载
    微信登录下载
    三方登录下载: QQ登录
    二维码
    扫码关注公众号登录
    下载资源需要5金币
    邮箱/手机:
    温馨提示:
    快捷下载时,如果您不填写信息,系统将为您自动创建临时账号,适用于临时下载。
    如果您填写信息,用户名和密码都是您填写的【邮箱或者手机号】(系统自动生成),方便查询和重复下载。
    如填写123,账号就是123,密码也是123。
    支付方式: 支付宝    微信支付   
    验证码:   换一换

    加入VIP,免费下载
     
    账号:
    密码:
    验证码:   换一换
      忘记密码?
        
    友情提示
    2、PDF文件下载后,可能会被浏览器默认打开,此种情况可以点击浏览器菜单,保存网页到桌面,就可以正常下载了。
    3、本站不支持迅雷下载,请使用电脑自带的IE浏览器,或者360浏览器、谷歌浏览器下载即可。
    4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰。
    5、试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。

    R语言_Shiny包-_学习笔记.docx

    R语言_Shiny包学习笔记ZW2024-03-17ShinyApp的基本构成ShinyaPP有两部分(ui.R和SerVer.R可以放在一个R脚本文件中app.R): 一个用户交互脚本(ui):Ui负责控制布局和展示,在源脚本中固定的名称为ui.R 一个服务器脚本(server):SerVer.R脚本包含建立app计算机需要的基本说明文件夹内容如下(创建的WWW文件夹用来存放JS、CSS、图片、html等):PgrarnFiles>R>R-4.3.3>library>shiny>examples>08htmlXZ名称修改日期类型WWW2024/3/717:57文件夹0app.R2023/11/2216:43R文件DDESCRIPTION2023/11/2216:43文件oReadme.md9CreateShinyappI2023/11/2216:43MD文件ShinyAppId=htlTemplatef.,*widex.htlw,SerVerIibrary(Shiny)ui<-fluidPage(textoutput("greeting")server<-function(input,output,session)output$greeting<-renderText("Hellohuman!")shinyApp(ui=Ui,server=server)运行方式#app.R的路径Iibrary(Shiny)runApp("my_app")Shinyapps示例Youcanalsoembedplots,forexample:system.file("examples",package="shiny")runExample("0:LJIello")#ahistogramrunExample("02_text")#tabLesanddataframesrunExample("03_reactivity")#areactiveexpressionrunExample("04_mpg")#gLobaLVariabLesrunExample("05_sliders")#sLiderbarsrunExample("06_tabsets")#tabbedpaneLsrunExample("07_widgets")#heLptextandsubmitbuttonsrunExample("08_html")#ShinyappbutLtfromHTMLrunExample("09_upload")#fiLeupLoadwizardrunExample("10_download")#fiLedownloadwizardrunExample("ll_timer")#anautomatedtimer布局fluidPage函数来展示一个自动调整组件尺寸大小来适应浏览器,所有组件放在fluidPage函数中,得到整个app的布局。除了fluidPage()之外,Shiny还提供了一些其他的页面函数,这些函数可以在更专业的情况下派上用场:fixedPage()和fillPage()0Iibrary(Shiny)ui<-fluidPage(titlePanel("titlepanel"),SidebarLayout(position="right",sidebarPanel("sidebarpanel")jmainPanel("mainpanel")侧边栏(SidebarPaneI部分)默认出现在app的左边,通过调整Sidebar'Layout函数的一个参数position="right”将SidebarPanel调到右边。fluidPage()titlePanel()SidebarLayoutOsidebarPanel()mainPanel()tabsetPanel()为任意数量的tabPanels()创建一个容器,该容器又可以包含任何其他HTML组件。ui<-fluidPage(tabsetPanel(tabPanel("Importdata"jfile工叩Ut("file","Data",buttonLabel="Upload.textlnput("delim","Delimiter(leaveblanktoguess)","")4numericlnput("skip","Rowstoskip",0,min=0),numericinput("rows","Rowstopreview",10,min=1),tabPanel("Setparameters")jtabPanel("Visualiseresults")ImportdataSmPerwneterSVualeMEUlt3DateUpload.NofMeeeiectedDelimttef(leaveblanktoguess)Rowstoskjp0mRowstopreviow1。m如果你想知道用户选择了哪个选项卡,你可以向tabsetPanel提供id参数,它成为一个输入。Iibrary(Shiny)ui<-fluidPage(sidebarLayout(sidebarPanel(textoutput("panel"),mainPanel(tabsetPanel(id="tabsettabPanel(',panel1","one"),tabPanel("panel2","two"),tabPanel("panel3","three")server<-function(input,output,session)OUtPUt$Panel<-renderText(paste("Currentpanel:",input$tabset)shinyApp(ui=ui,server=server)navlistPanel()与tabsetPanel()类似,但它不是水平运行选项卡标题,而是在侧边栏中垂直显示它们。ui<-fluidPage(navlistPanel(id="tabset","Heading,tabPanel("panel1","Panelonecontents"),"Heading2",tabPanel("panel2","Paneltwocontents"),tabPanel("panel3","Panelthreecontents")另一种方法是使用navbarPage():它仍然水平运行选项卡标题,但您可以使用navbarMenu()添加下拉菜单以获得额外的层次结构级别。ui<-navbarPage("Pagetitle",tabPanel(,'panel1","one"),tabPanel("panel2","two"),tabPanel(,'panel3","three"),navbarMenu("subpanels",tabPanel("panel4a,j,four-a,)jtabPanel("panel4b","four-b"),tabPanel("panel4c",four-c")主题安装bslib包或者shinythemes包使用页面主题。thematic包可以为ggplot2lattice和baseplots提供主题,只需在服务器函数中调用thematic_shiny()o自己制作的主题,可以写好的主题放在WWw/的子文件夹下myappI-server.RI-ui.RI-wwI-mytheme.cssui<-fluidPage(theme<-bslib:bs_theme(bg="#0b3d91'fg="white"jbase_font="SourceSansPro")# theme<-shinytheme("ceruLean',)# 自制主题theme<-"mytheme.css")server<-function(input,output,session)thematic:thematic_shiny()OUtPUt$PlOt<-renderPlot(ggplot(mtcarsaes(wt,mpg)+geom_point()+geom_smooth(),res=96)ConditionalPanel创建一个面板,该面板根据JavaScript表达式的值显示和隐藏其内容。即使你不懂任何JaVaSCript,简单的比较或相等操作也非常容易做到。ui<-fluidPage(selectlnput("dataset","Dataset",c("diamonds","rock","pressure","cars"),ConditionalPanel(condition="output.nrows",checkbo×Input(',headonly"j"Onlyusefirst1000rows")server<-function(input,output,session)datasetinput<-reactive(switch(input$dataset,"rock"=rock,"pressure"=pressure,"cars"=cars)output$nrows<-reactive(nrow(datasetlnput()outputoptions(outputj"nrows"SuspendWhenHidden=FALSE)shinyApp(uijserver)HTML可以将您自己的HTML添加到Ui中。一种方法是用HTML()函数来包含HTML,用另外一种是使用Shiny提供的HTML助手。重要的标签元件有常规函数(如hl()和p(),所有其他标签都可以通过tags使用。names(tags)查看标签。ui<-fluidPage(HTML(r"(<hl>Thisisaheading<hl><pclass=,my-class">Thisissometext!<p><ul><li>Firstbullet<li><li>Secondbullet<li><ul>)")#同上ui<-fluidPage(hl(,Thisisaheading"),p("Thisissometext",class="my-class")jtags$ul(tags$li("Firstbullet"),tags$li("Secondbullet")#注意inLine=TRUE;的使用textutput()默认是生成一个完整的段落。tags$p("Youmade",tags$b("$",textoutput("amount"jinline=TRUE),"inthelast"jtextoutput("days",inline=TRUE),"days")img函数通过特殊处理才能找到图片,图片文件必须在WWW文件及在下,WWW文件和app.R脚本同路径(在同一文件下)img(src="my_image.png"jheight=72,width=72)Iibrary(Shiny)ui<-fluidPage(titlePanel(

    注意事项

    本文(R语言_Shiny包-_学习笔记.docx)为本站会员(王**)主动上传,优知文库仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知优知文库(点击联系客服),我们立即给予删除!

    温馨提示:如果因为网速或其他原因下载失败请重新下载,重复下载不扣分。




    关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

    copyright@ 2008-2023 yzwku网站版权所有

    经营许可证编号:宁ICP备2022001189号-2

    本站为文档C2C交易模式,即用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。优知文库仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知优知文库网,我们立即给予删除!

    收起
    展开