knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "100%" )
The goal of instaquote is to make it easy to plot quotes in an image so that you can export them to instagram/social media or in R markdown.
You can install the development version from GitHub with:
# install.packages("devtools") devtools::install_github("bryanwhiting/instaquote")
This is a basic example which shows you how to solve a common problem:
library(instaquote) ## basic example code txt <- 'hello world' instaquote(txt)
Notice the watermark gospelanalysis.com
. If anyone else besides me
uses this package, I'm happy to remove that. I just built it into the default
option.
You can customize with html:
txt <- '**hello** <span style="color:red">world</span>' instaquote(txt, bg_color='black')
Generate custom text:
txt <- insta_text( title = '**Cool** _title_', subtitle = 'A **really** long subtitle that will eventually wrap if I write enough words on it. it also _supports_ **markdown** and <span style="color:pink">html</span>.') instaquote(txt)
ggtext
and ggplot2
power this project. Thanks to the awesome authors
of those packages!Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.