各行からメールを送信するために tibble を反復処理しようとしていますが、動作しません。次に例を示します。
パッケージ
library(tidyverse)
library(sendmailR)
library(pander)
まず、メールに含めたいテーブルを作成します
tbl <- tibble(A = c(1,2,3),
B = c(4,5,6),
C = c(7,8,9))
table <- pander_return(tbl)
ティブルを作成します。各列は、メールに含めたい特定の情報に対応しています
emails <- tibble(from = c("jane.doe@gm.com", "john.doe@gm.com"),
to = c("jane.doe@gm.com", "john.doe@gm.com"),
subject = "This is test",
greetings = "Happy Christmas",
data = list(table, table))
map
ここで、各列に正しい場所に追加してsendmail
、sendmailR パッケージから機能させたいと思います。1つのメールを送信する方法の例を次に示します。興味深いのは、greetings
とtable
を結合して msg フィールドを作成する方法です。
from <- "jane.doe@gm.com"
to <- "jane.doe@gm.com"
subject <- "This is test"
msg <- c(greetings, table)
sendmailR::sendmail(from = from, to = to, subject = subject, msg = msg)
では、どのようにメール tibble をsendmail
機能するようにマッピングすれば、メールは各行で送信されるのでしょうか。