With block_spacer() we can more easily define an area of whitespace in a
block-based layout. This function is meant to be easily combined with other
block_*() functions. Like all block_*() functions, block_spacer() must
be placed inside of blocks() and the resultant blocks object can be
provided to the body, header, or footer arguments of compose_email().
block_spacer()# Create a block of two, side-by-side
# articles with two `article()` calls
# inside of `block_articles()`, itself
# placed in `blocks()`; include some
# introductory text and place extra
# space around that text (with
# `block_spacer()`)
email <-
compose_email(
body =
blocks(
block_spacer(),
block_text(
"These are two of the cities I visited this year.
I liked them a lot, so, I'll visit them again!"),
block_spacer(),
block_articles(
article(
image = "https://i.imgur.com/dig0HQ2.jpg",
title = "Los Angeles",
content =
"I want to live in Los Angeles.
Not the one in Los Angeles.
No, not the one in South California.
They got one in South Patagonia."
),
article(
image = "https://i.imgur.com/RUvqHV8.jpg",
title = "New York",
content =
"Start spreading the news.
I'm leaving today.
I want to be a part of it.
New York, New York."
)
)
)
)
if (interactive()) email