搜索
查看: 1670|回复: 1

6-用DT包来辅助shiny写网页显示表格

[复制链接]

634

主题

1182

帖子

4030

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
4030
发表于 2017-3-16 11:35:41 | 显示全部楼层 |阅读模式
非常赞,赞不绝口:
[AppleScript] 纯文本查看 复制代码
library(shiny)
library(rmarkdown)
if (!require("DT")) install.packages('DT')
ui <- (datatable(head(iris), class = 'cell-border stripe'))
server <- function(input, output) {}
shinyApp(ui, server)


参考:https://rstudio.github.io/DT/
你这个问题很复杂,需要打赏,请点击 http://www.bio-info-trainee.com/donate 进行打赏,谢谢
回复

使用道具 举报

25

主题

49

帖子

326

积分

中级会员

Rank: 3Rank: 3

积分
326
发表于 2018-9-19 21:00:31 | 显示全部楼层
本帖最后由 hijack 于 2018-9-19 21:01 编辑

老大我把这段代码复制下来运行时不显示表格,百度一个教程参照改了一下,显示了。不知道对不对,给你过目
[AppleScript] 纯文本查看 复制代码
library(shiny)
if (!require("DT")) install.packages('DT')
library(DT)
ui <- (DT::dataTableOutput("x"))
server <- function(input, output) {
  output$x <- DT::renderDataTable({
    as.data.frame(head(iris),class = 'cell-border stripe')
  })
}

  shinyApp(ui, server)
参考:https://blog.csdn.net/Blackrosetian/article/details/78978321
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|小黑屋|生信技能树    

GMT+8, 2019-5-27 04:06 , Processed in 0.029514 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.