在R-Studio中,我正在从以下网站运行代码:https : //cran.r-project.org/web/packages/ztable/vignettes/heatmapTable.html,尤其是以下代码。
install.packages("ztable")
if(!require(devtools)) install.packages("devtools")
devtools::install_github("cardiomoon/ztable")
require(moonBook)
x=table(acs$Dx,acs$smoking)
library(ztable)
library(magrittr)
options(ztable.type="html")
z=ztable(x)
print(z,caption="Table 1. Basic Table")
我希望可以在R-Studio绘图或查看器窗格中看到该表,但是html文本打印在我的控制台窗格中。如何在R-Studio中查看表格?
一种选择是创建RMD
文件(Rstudio
使用File
-> New File
->选项从中创建新文件R Markdown...
)
然后results = 'asis'
在块中指定。点击Knit
->Knit to HTML
-RMD文件内容
---
title: "Ztable"
author: "akrun"
date: "01/11/2020"
output: html_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
## R Markdown
```{r ztable, results = 'asis', echo = FALSE}
suppressPackageStartupMessages(library(moonBook))
x=table(acs$Dx,acs$smoking)
suppressPackageStartupMessages(library(ztable))
suppressPackageStartupMessages(library(magrittr))
options(ztable.type="html")
z=ztable(x)
print(z,caption="Table 1. Basic Table")
```
-输出
如果我们不想创建RMD
文件,另一种选择是创建一个类似于此处所示功能的函数
view_ztable <- function(x, ...){
tab <- paste(capture.output(ztable(x, ...)), collapse = '\n')
tf <- tempfile(fileext = ".html")
writeLines(tab, tf)
rstudioapi::viewer(tf)
}
view_ztable(x, format = 'html', table.attr = "class=nofluid")
-在查看器中输出
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句