我试图在一些分析之后创建一个报告,但它会导致与“主输出表”中的每个表相关的表太多。因此,我一直试图将每个表嵌套在其适当的行中,在df中创建一个嵌套的df列。
这是我试图创建的一个例子,在Rstudio查看器中,它看起来与我想要的完全一样。用户可以单击每个嵌套的df来扩展它。
我尝试过tibbles、reactable、DT、Kable和data.table,但它们似乎都呈现了不同的东西(不是可扩展的信息,例如< df >,或者只是打印创建不可用报告的所有内容)。
我的下一个选择是生产一个闪亮的应用程序,但它们的输出不能发送给用户,所以我宁愿避免这样做。
标题:“测试”
输出: html_document
knitr::opts_chunk$set(echo = TRUE)
library("tidyverse")
library("rlist")
library(reactable)
library(tibble)json文件"br08001.json“来自这里的https://www.genome.jp/kegg-bin/get_htext?br08001+C00186 - 'Download‘
KEGG_compounds <- jsonlite::fromJSON('br08001.json', flatten = TRUE)
df <- KEGG_compounds[[2]]
tibble::as_tibble(df)@Daniel Jachetta____________建议的_____________________改进
---
title: "Test"
author: "..."
date: "`r Sys.Date()`"
output:
html_document
---
```{r}jsonlite::fromJSON('C:/Users/skourtis/Downloads/br08001.json',flatten = KEGG_compounds )[2]
DT::数据表(KEGG_compounds)
<button class="btn btn-primary" data-toggle="collapse" data-target="#BlockName"> Organic Acids </button>
<div id="BlockName" class="collapse">
```{r}DT::datatable(KEGG_compounds[2][1])
</div>
<button class="btn btn-primary" data-toggle="collapse" data-target="#BlockName1"> Lipids </button>
<div id="BlockName1" class="collapse">
```{r}DT::数据表(KEGG_compounds[2][2])
</div>
<button class="btn btn-primary" data-toggle="collapse" data-target="#BlockName2"> Carbohydrates </button>
<div id="BlockName2" class="collapse">
```{r}DT::数据表(KEGG_compounds[2][3])
</div>发布于 2020-05-16 16:07:44
这并不是真正的图形方面,但这会为每个数据集名称提供按钮。你能帮我访问你的小面包,我可以修改我的粗略草稿答案。
---
title: "Test"
author: "..."
date: "`r Sys.Date()`"
output:
html_document
---
<button class="btn btn-primary" data-toggle="collapse" data-target="#BlockName"> iris </button>
<div id="BlockName" class="collapse">
```{r}打印(虹膜)
</div>
<button class="btn btn-primary" data-toggle="collapse" data-target="#BlockName1"> Cars </button>
<div id="BlockName1" class="collapse">
```{r}印刷(Mtcar)
</div>https://stackoverflow.com/questions/61832722
复制相似问题