Mengembalikan urutan DT::datatables dalam senarai dokumen HTML rajutan

Question

Saya mempunyai fungsi yang mengembalikan satu siri jadual. Saya mahu mengembalikan semuanya sebagai DT::datatable. Walau bagaimanapun, saya tidak boleh mendapatkan R untuk mengembalikan jadual ini apabila ia berada dalam senarai. Ia muncul dalam fail RMarkdown tetapi tidak dalam fail HTML rajutan. Adakah mungkin untuk mempunyai jadual muncul dalam dokumen HTML?

---
title: "Untitled"
output: html_document
---

knitr::opts_chunk$set(echo = TRUE)
library(tidyverse)

myfunc <- function(dataset){
  
  return_list <- list()
  
  mytab <- DT::datatable(dataset)
  
  return_list$mytab <- mytab
  
  return(return_list)
}

myfunc(mtcars)

---

Jadual muncul dalam fail RMarkdown:

Tetapi tidak muncul dalam fail HTML rajutan:

Answer 1

Terdapat dua cara untuk melakukan ini:

Jika anda tahu kunci terlebih dahulu, gunakan sahaja kekunci untuk menelefon

myfunc(mtcars)$mytab

Jika anda bercadang untuk membuat senarai yang lebih panjang dan ingin mencetak semua jadual dalam senarai, gunakan {htmltools} 中的 tagList

htmltools::tagList(myfunc(mtcars))