R HTML输出文件

时间:2017-11-23 17:25:31

标签: html r shiny output r-markdown

我正在使用R生成HTML报告输出,当我得到输出html文件并打开它时,我可以看到我使用ggplot创建的图表没问题但是如果我将html文件发送给其他人图表丢失了他们只看文字。我的代码如下,对我所缺少的任何建议都会很棒。

此外,我的本地驱动器中的图像没有显示出来。

---
title: "title"
 ``author: 
- "X"
date: "`r format(Sys.time(), '%d %B %Y')`"
output: 
  html_document: 
 number_sections: yes
toc: yes
runtime: shiny    
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE,message=FALSE, warning=FALSE)
```

{r libraries, include=FALSE} library(plyr) library(dplyr) library(tidyverse) library(ggplot2) library(forcats) library(reshape) library(png)

```{r, fig.width=12, fig.height=6, fig.align="center"}
# read in data file
lj= read.csv("LJ_Final.csv")  # read csv file

#rename variables to fit charts
names(lj)[names(lj) == "2015"] <- "15"

myvars <- c("HB","15")
newdatajoiner <- lj[myvars]

newdatajoiners.long<-melt(newdatajoiner,id.vars="HB")

aggdatajoiners <-aggregate(value ~ HB + variable, data = 
newdatajoiners.long, sum)

#plot the data
aggdatajoiners%>%
ggplot(aes(x=variable,y=value,fill=factor(HB)))+
 geom_bar(stat="identity",position="dodge")+
 labs(x="", y="")+
 theme_bw()+
 facet_wrap(~HB)
```
```{r,fig.align="center",out.width = "3000px"}
knitr::include_graphics('./tablefife.png')
```

2 个答案:

答案 0 :(得分:1)

当您从Markdown文件生成HTML时,会生成带有HTML的图像文件夹,您的图像会被HTML引用,而不会包含在html文件本身中。您还需要发送此文件夹。

您可以将图像转换为base64字符串并嵌入html文件中,但我不知道如何在R中自动执行此操作

答案 1 :(得分:1)

@ user3018495另一个帖子描述了如何排除图表。要在输出HTML文档中包含图表,可以在Rmd输出选项中将self_contained设置为yes而不是no

---
title: "your title goes here"
output:
   html_document:
   self_contained: yes
   toc: yes
   toc_float: yes
---

如果您使用带编织器的RStudio,则在RStudio选项中配置。首先在代码编辑器窗口中选择齿轮。

enter image description here

接下来,选择Advanced标签和

  1. 点击Standalone HTML
  2. 然后按“OK”。
  3. enter image description here

    当您编写文档时,生成的HTML文件将包含图表,如我在Github存储库中发布的test HTML document所示,因此可以由Github HTML预览器查看。

    的问候,

    Len