首页 > 解决方案 > 使用 blastula [R] 从 daff 包发送 HTML 表

问题描述

我想显示 2 个数据帧之间的差异(使用 'daff' 包的差异)并呈现 HTML 以通过 SMTP 客户端在电子邮件中发送'blastula'

代码:

library (daff)
library (blastula)

A <- data.frame(
  x=1:10,
  y=10:1)

B <- data.frame(
  x=1:10,
  y=1:10)

DiffHTML <- render_diff(diff_data (A , B, show_unchanged = TRUE, show_unchanged_columns = TRUE,
                                      ordered=FALSE),
                           title = "Diff: A vs B ")

Recipientlist <- c("*****@******")

body_mail <- compose_email(md(DiffHTML))

smtp_send( body_mail ,
           from = "*******",
           to = Recipientlist,
           subject = "TestMail",
           credentials = creds_key("********"))

在 RStudio 中,我得到了一个格式很好的表格: daff::diff_data 输出

====================>

当我收到电子邮件时(在 Outlook 中,表格被弄乱了,正文中有一些 HTML 代码):

====================> 收到消息

我怀疑 daff / blastula 创建的一些标签不是标准的,Outlook 也不能容忍。我已经为此奋斗了几个星期,如果有任何线索或建议,我将不胜感激。

非常感谢提前!!

标签: htmlroutlookdiffblastula

解决方案


推荐阅读