I would like to display the difference between 2 dataframes (diff using 'daff' package) and render the HTML to be sent in an email through the SMTP client in '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("********"))
In RStudio I get a nicely formatted table but,
When I receive the email (in outlook, the table gets messed up and there is some HTML code in the body):
I suspect there are some tags created by daff / blastula that are not standard and not tolerated by Outlook.. I have been battling with this for a few weeks now, and would be grateful for any lead or suggestion.
Thanks a lot in advance!!