3

请在下面找到我用来与 R 中的朋友分享我的分析（数据框）的代码。我正在使用sendmailR包和pander：

library(sendmailR)

from <- "<me@gmail.com>"
to <- "<friend@gmail.com>"
subject <- "Important Report of the Day!!"
body <- "This is the result of the test:"                     
mailControl=list(smtpServer="ASPMX.L.GOOGLE.COM")
#-----------------------------------------------------
msg_content <- mime_part(paste('<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0
Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  <meta name="viewport" content="width=device-width, initial-scale=1.0"/>
</head>
<body><pre>', paste(pander_return(pander(vvv, style="multiline")), collapse = '\n'), '</pre></body>
</html>'))

msg_content[["headers"]][["Content-Type"]] <- "text/html"

sendmail(from=from,to=to,subject=subject,msg=msg_content,control=mailControl)

问题是在邮件中表格被分成两部分（8列表和4列表）PFB示例图片

在此处输入图像描述

如何更改我的代码以使我的 12 列表保持不变。

添加此行后

panderOptions('table.split.table', Inf)

这是我收到的电子邮件在此处输入图像描述

4

1 回答 1

1

您必须通过参数增加或禁用生成的降价表的默认最大宽度（也可以与调用一起使用，毕竟它将将该参数传递给）或通过更新全局选项.split.tablespandoc.tablepanderpandoc.tablepanderOptions

pander更新通话的快速示例：

paste(pander_return(pander(vvv, split.tables = Inf)), collapse = '\n')

或者为所有未来的pander调用全局设置：

panderOptions('table.split.table', Inf)
于 2016-03-16T08:10:21.870 回答