Skip to content

Instantly share code, notes, and snippets.

@jnolis
Last active July 28, 2022 14:53
Show Gist options
  • Save jnolis/d59fdde9e0a7d5ddcffc407e2818c954 to your computer and use it in GitHub Desktop.
Save jnolis/d59fdde9e0a7d5ddcffc407e2818c954 to your computer and use it in GitHub Desktop.
library(ggplot2)
library(ggirl)
# create the plot
plot <- ggplot() +
geom_polygon( data=map_data("state"), aes(x=long, y=lat, group=group),
fill="#cdddee", color="#7296bc" )+
geom_point(data = data.frame(long = -77.01728, lat = 38.78125),
aes(x=long, y=lat),
size=8,
shape = 23,
color = "#404040",
fill = "#f16529")+
coord_map("albers", lat0 = 45.5, lat1 = 29.5) +
labs( x = "Longitude", y = "Latitude",
title = "Greetings from rstudio::conf(2022)") +
theme(text = element_text(size = 17))
# change these to whatever your email address, recipient, and message should be.
# The recipient must be in the US.
contact_email <- ""
send_address <- address(name = "",
address_line_1 = "",
city = "",
state = "",
postal_code = "",
country = "US")
message <- "This is a great conference, thanks for putting it on!"
# open the order page
ggpostcard(plot, contact_email,
messages = message,
send_addresses = send_address)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment