Suppose you're opening an issue and there's a lot noisey logs that may be useful.
Rather than wrecking readability, wrap it in a <details> tag!
<details>
Summary Goes Here| #!/bin/bash | |
| sudo apt-get update | |
| sudo apt-get install \ | |
| libxml2-dev \ | |
| libsqlite-dev \ | |
| libcurl4-openssl-dev \ | |
| libssl-dev \ | |
| libmagick++-dev |
| # data from http://ec.europa.eu/eurostat/web/gisco/geodata/reference-data/population-distribution-demography/geostat | |
| # Originally seen at http://spatial.ly/2014/08/population-lines/ | |
| # So, this blew up on both Reddit and Twitter. Two bugs fixed (southern Spain was a mess, | |
| # and some countries where missing -- measure twice, submit once, damnit), and two silly superflous lines removed after | |
| # @hadleywickham pointed that out. Also, switched from geom_segment to geom_line. | |
| # The result of the code below can be seen at http://imgur.com/ob8c8ph | |
| library(tidyverse) |
| # This lets you type `make` | |
| # and will pandoc all *.Rmd files in the letters directory | |
| # into pdfs stored in the output directory | |
| all: readme letters | |
| #generate all letters | |
| SRC=$(wildcard letters/*.Rmd) | |
| OUT=$(patsubst letters/%.Rmd, output/%.pdf, $(SRC)) | |
| letters: $(OUT) |
| #!/bin/sh | |
| # Userland mode (~$USER/), (~/). | |
| # ~/.fonts is now deprecated and that | |
| #FONT_HOME=~/.fonts | |
| # ~/.local/share/fonts should be used instead | |
| FONT_HOME=~/.local/share/fonts | |
| echo "installing fonts at $PWD to $FONT_HOME" | |
| mkdir -p "$FONT_HOME/adobe-fonts/source-code-pro" |
| # The initial version | |
| if [ ! -f .env ] | |
| then | |
| export $(cat .env | xargs) | |
| fi | |
| # My favorite from the comments. Thanks @richarddewit & others! | |
| set -a && source .env && set +a |
| library(png) | |
| library(ggforce) | |
| library(animation) | |
| library(tweenr) | |
| jhu_png = readPNG("jhudsl.png") | |
| x = rep(1:510,each=555) | |
| y = rep(1:555,510) | |
| val = jhu_png[,,3] | |
| val = round(val) |
| github_pubkey <- function(user){ | |
| url <- sprintf("https://api.github.com/users/%s/keys", user) | |
| keys <- jsonlite::fromJSON(url) | |
| lapply(keys$key, openssl::read_pubkey) | |
| } | |
| # Get pubkey from Gabor | |
| gabor <- github_pubkey('gaborcsardi') | |
| pubkey <- gabor[[1]] #has 3 keys, use first one |
| variables: | |
| CODECOV_TOKEN: "CODECOV_TOKEN_STRING" | |
| _R_CHECK_CRAN_INCOMING_: "false" | |
| _R_CHECK_FORCE_SUGGESTS_: "true" | |
| APT_PKGS: "libcurl4-openssl-dev libssh2-1-dev libssl-dev libxml2-dev zlib1g-dev git" | |
| before_script: | |
| - apt-get update | |
| - apt-get install -y --no-install-recommends ${APT_PKGS} | |
| - apt-get install -y --no-install-recommends qpdf pandoc pandoc-citeproc |