2023-10-11 09:41:10 -04:00
<!DOCTYPE html>
< html xmlns = "http://www.w3.org/1999/xhtml" lang = "en" xml:lang = "en" > < head >
< meta charset = "utf-8" >
< meta name = "generator" content = "quarto-1.3.450" >
< meta name = "viewport" content = "width=device-width, initial-scale=1.0, user-scalable=yes" >
2023-10-12 10:33:35 -04:00
< meta name = "author" content = "Kyle Belanger" >
< meta name = "dcterms.date" content = "2022-07-28" >
2023-10-11 09:41:10 -04:00
2023-10-12 10:33:35 -04:00
< title > Kyle Belanger - Making Maps in R< / title >
2023-10-11 09:41:10 -04:00
< style >
code{white-space: pre-wrap;}
span.smallcaps{font-variant: small-caps;}
div.columns{display: flex; gap: min(4vw, 1.5em);}
div.column{flex: auto; overflow-x: auto;}
div.hanging-indent{margin-left: 1.5em; text-indent: -1.5em;}
ul.task-list{list-style: none;}
ul.task-list li input[type="checkbox"] {
width: 0.8em;
margin: 0 0.8em 0.2em -1em; /* quarto-specific, see https://github.com/quarto-dev/quarto-cli/issues/4556 */
vertical-align: middle;
}
< / style >
< script src = "../../site_libs/quarto-nav/quarto-nav.js" > < / script >
< script src = "../../site_libs/quarto-nav/headroom.min.js" > < / script >
< script src = "../../site_libs/clipboard/clipboard.min.js" > < / script >
< script src = "../../site_libs/quarto-search/autocomplete.umd.js" > < / script >
< script src = "../../site_libs/quarto-search/fuse.min.js" > < / script >
< script src = "../../site_libs/quarto-search/quarto-search.js" > < / script >
< meta name = "quarto:offset" content = "../../" >
< script src = "../../site_libs/quarto-html/quarto.js" > < / script >
< script src = "../../site_libs/quarto-html/popper.min.js" > < / script >
< script src = "../../site_libs/quarto-html/tippy.umd.min.js" > < / script >
< script src = "../../site_libs/quarto-html/anchor.min.js" > < / script >
< link href = "../../site_libs/quarto-html/tippy.css" rel = "stylesheet" >
< link href = "../../site_libs/quarto-html/quarto-syntax-highlighting.css" rel = "stylesheet" id = "quarto-text-highlighting-styles" >
< script src = "../../site_libs/bootstrap/bootstrap.min.js" > < / script >
< link href = "../../site_libs/bootstrap/bootstrap-icons.css" rel = "stylesheet" >
< link href = "../../site_libs/bootstrap/bootstrap.min.css" rel = "stylesheet" id = "quarto-bootstrap" data-mode = "light" >
< script id = "quarto-search-options" type = "application/json" > {
"location": "navbar",
"copy-button": false,
"collapse-after": 3,
"panel-placement": "end",
"type": "overlay",
"limit": 20,
"language": {
"search-no-results-text": "No results",
"search-matching-documents-text": "matching documents",
"search-copy-link-title": "Copy link to search",
"search-hide-matches-text": "Hide additional matches",
"search-more-match-text": "more match in this document",
"search-more-matches-text": "more matches in this document",
"search-clear-button-title": "Clear",
"search-detached-cancel-button-title": "Cancel",
"search-submit-button-title": "Submit",
"search-label": "Search"
}
}< / script >
< link rel = "stylesheet" href = "../../styles.css" >
< / head >
2023-10-12 10:33:35 -04:00
< body class = "floating nav-fixed" >
2023-10-11 09:41:10 -04:00
< div id = "quarto-search-results" > < / div >
< header id = "quarto-header" class = "headroom fixed-top" >
< nav class = "navbar navbar-expand-lg navbar-dark " >
< div class = "navbar-container container-fluid" >
< div class = "navbar-brand-container" >
< a class = "navbar-brand" href = "../../index.html" >
2023-10-11 11:15:38 -04:00
< span class = "navbar-title" > Kyle Belanger< / span >
2023-10-11 09:41:10 -04:00
< / a >
< / div >
< div id = "quarto-search" class = "" title = "Search" > < / div >
< button class = "navbar-toggler" type = "button" data-bs-toggle = "collapse" data-bs-target = "#navbarCollapse" aria-controls = "navbarCollapse" aria-expanded = "false" aria-label = "Toggle navigation" onclick = "if (window.quartoToggleHeadroom) { window.quartoToggleHeadroom(); }" >
< span class = "navbar-toggler-icon" > < / span >
< / button >
< div class = "collapse navbar-collapse" id = "navbarCollapse" >
< ul class = "navbar-nav navbar-nav-scroll ms-auto" >
< li class = "nav-item" >
2023-10-11 11:15:38 -04:00
< a class = "nav-link" href = "../../blog.html" rel = "" target = "" >
< span class = "menu-text" > Posts< / span > < / a >
2023-10-12 10:33:35 -04:00
< / li >
< li class = "nav-item" >
< a class = "nav-link" href = "../../kyle_resume.pdf" rel = "" target = "" >
< span class = "menu-text" > Resume< / span > < / a >
2023-10-11 09:41:10 -04:00
< / li >
< li class = "nav-item compact" >
2023-10-11 11:15:38 -04:00
< a class = "nav-link" href = "https://github.com/mmmmtoasty19" rel = "" target = "" > < i class = "bi bi-github" role = "img" >
2023-10-11 09:41:10 -04:00
< / i >
< span class = "menu-text" > < / span > < / a >
< / li >
< / ul >
< div class = "quarto-navbar-tools" >
< / div >
< / div > <!-- /navcollapse -->
< / div > <!-- /container - fluid -->
< / nav >
< / header >
<!-- content -->
2023-10-12 10:33:35 -04:00
< header id = "title-block-header" class = "quarto-title-block default toc-left page-columns page-full" >
2023-10-11 09:41:10 -04:00
< div class = "quarto-title-banner page-columns page-full" >
< div class = "quarto-title column-body" >
2023-10-12 10:33:35 -04:00
< h1 class = "title" > Making Maps in R< / h1 >
< p class = "subtitle lead" > < / p > < p > A short description of the post.< / p > < p > < / p >
< / div >
2023-10-11 09:41:10 -04:00
< / div >
< div class = "quarto-title-meta" >
< div >
< div class = "quarto-title-meta-heading" > Author< / div >
< div class = "quarto-title-meta-contents" >
2023-10-12 10:33:35 -04:00
< p > < a href = "https://kyleb.rbind.io/" > Kyle Belanger< / a > < / p >
2023-10-11 09:41:10 -04:00
< / div >
< / div >
< div >
< div class = "quarto-title-meta-heading" > Published< / div >
< div class = "quarto-title-meta-contents" >
2023-10-12 10:33:35 -04:00
< p class = "date" > July 28, 2022< / p >
2023-10-11 09:41:10 -04:00
< / div >
< / div >
< / div >
< / header > < div id = "quarto-content" class = "quarto-container page-columns page-rows-contents page-layout-article page-navbar" >
<!-- sidebar -->
2023-10-12 10:33:35 -04:00
< nav id = "quarto-sidebar" class = "sidebar collapse collapse-horizontal sidebar-navigation floating overflow-auto" >
2023-10-11 09:41:10 -04:00
2023-10-12 10:33:35 -04:00
< / nav >
< div id = "quarto-sidebar-glass" data-bs-toggle = "collapse" data-bs-target = "#quarto-sidebar,#quarto-sidebar-glass" > < / div >
<!-- margin - sidebar -->
< div id = "quarto-margin-sidebar" class = "sidebar margin-sidebar" >
< / div >
2023-10-11 09:41:10 -04:00
<!-- main -->
< main class = "content quarto-banner-title-block" id = "quarto-document-content" >
2023-10-12 10:33:35 -04:00
< p > Distill is a publication format for scientific and technical writing, native to the web.< / p >
< p > Learn more about using Distill at < a href = "https://rstudio.github.io/distill" class = "uri" > https://rstudio.github.io/distill< / a > .< / p >
2023-10-11 09:41:10 -04:00
2023-10-12 10:33:35 -04:00
< div id = "quarto-appendix" class = "default" > < section class = "quarto-appendix-contents" > < h2 class = "anchored quarto-appendix-heading" > Reuse< / h2 > < div id = "quarto-reuse" class = "quarto-appendix-contents" > < div > < a rel = "license" href = "https://creativecommons.org/licenses/by/4.0/" > https://creativecommons.org/licenses/by/4.0/< / a > < / div > < / div > < / section > < section class = "quarto-appendix-contents" > < h2 class = "anchored quarto-appendix-heading" > Citation< / h2 > < div > < div class = "quarto-appendix-secondary-label" > BibTeX citation:< / div > < pre class = "sourceCode code-with-copy quarto-appendix-bibtex" > < code class = "sourceCode bibtex" > @online{belanger2022,
author = {Belanger, Kyle},
title = {Making {Maps} in {R}},
date = {2022-07-28},
langid = {en}
}
< / code > < button title = "Copy to Clipboard" class = "code-copy-button" > < i class = "bi" > < / i > < / button > < / pre > < div class = "quarto-appendix-secondary-label" > For attribution, please cite this work as:< / div > < div id = "ref-belanger2022" class = "csl-entry quarto-appendix-citeas" role = "listitem" >
Belanger, Kyle. 2022. < span > “Making Maps in R.”< / span > July 28, 2022.
< / div > < / div > < / section > < / div > < / main > <!-- /main -->
2023-10-11 09:41:10 -04:00
< script id = "quarto-html-after-body" type = "application/javascript" >
window.document.addEventListener("DOMContentLoaded", function (event) {
const toggleBodyColorMode = (bsSheetEl) => {
const mode = bsSheetEl.getAttribute("data-mode");
const bodyEl = window.document.querySelector("body");
if (mode === "dark") {
bodyEl.classList.add("quarto-dark");
bodyEl.classList.remove("quarto-light");
} else {
bodyEl.classList.add("quarto-light");
bodyEl.classList.remove("quarto-dark");
}
}
const toggleBodyColorPrimary = () => {
const bsSheetEl = window.document.querySelector("link#quarto-bootstrap");
if (bsSheetEl) {
toggleBodyColorMode(bsSheetEl);
}
}
toggleBodyColorPrimary();
const icon = "";
const anchorJS = new window.AnchorJS();
anchorJS.options = {
placement: 'right',
icon: icon
};
anchorJS.add('.anchored');
const isCodeAnnotation = (el) => {
for (const clz of el.classList) {
if (clz.startsWith('code-annotation-')) {
return true;
}
}
return false;
}
const clipboard = new window.ClipboardJS('.code-copy-button', {
text: function(trigger) {
const codeEl = trigger.previousElementSibling.cloneNode(true);
for (const childEl of codeEl.children) {
if (isCodeAnnotation(childEl)) {
childEl.remove();
}
}
return codeEl.innerText;
}
});
clipboard.on('success', function(e) {
// button target
const button = e.trigger;
// don't keep focus
button.blur();
// flash "checked"
button.classList.add('code-copy-button-checked');
var currentTitle = button.getAttribute("title");
button.setAttribute("title", "Copied!");
let tooltip;
if (window.bootstrap) {
button.setAttribute("data-bs-toggle", "tooltip");
button.setAttribute("data-bs-placement", "left");
button.setAttribute("data-bs-title", "Copied!");
tooltip = new bootstrap.Tooltip(button,
{ trigger: "manual",
customClass: "code-copy-button-tooltip",
offset: [0, -8]});
tooltip.show();
}
setTimeout(function() {
if (tooltip) {
tooltip.hide();
button.removeAttribute("data-bs-title");
button.removeAttribute("data-bs-toggle");
button.removeAttribute("data-bs-placement");
}
button.setAttribute("title", currentTitle);
button.classList.remove('code-copy-button-checked');
}, 1000);
// clear code selection
e.clearSelection();
});
function tippyHover(el, contentFn) {
const config = {
allowHTML: true,
content: contentFn,
maxWidth: 500,
delay: 100,
arrow: false,
appendTo: function(el) {
return el.parentElement;
},
interactive: true,
interactiveBorder: 10,
theme: 'quarto',
placement: 'bottom-start'
};
window.tippy(el, config);
}
const noterefs = window.document.querySelectorAll('a[role="doc-noteref"]');
for (var i=0; i< noterefs.length ; i + + ) {
const ref = noterefs[i];
tippyHover(ref, function() {
// use id or data attribute instead here
let href = ref.getAttribute('data-footnote-href') || ref.getAttribute('href');
try { href = new URL(href).hash; } catch {}
const id = href.replace(/^#\/?/, "");
const note = window.document.getElementById(id);
return note.innerHTML;
});
}
let selectedAnnoteEl;
const selectorForAnnotation = ( cell, annotation) => {
let cellAttr = 'data-code-cell="' + cell + '"';
let lineAttr = 'data-code-annotation="' + annotation + '"';
const selector = 'span[' + cellAttr + '][' + lineAttr + ']';
return selector;
}
const selectCodeLines = (annoteEl) => {
const doc = window.document;
const targetCell = annoteEl.getAttribute("data-target-cell");
const targetAnnotation = annoteEl.getAttribute("data-target-annotation");
const annoteSpan = window.document.querySelector(selectorForAnnotation(targetCell, targetAnnotation));
const lines = annoteSpan.getAttribute("data-code-lines").split(",");
const lineIds = lines.map((line) => {
return targetCell + "-" + line;
})
let top = null;
let height = null;
let parent = null;
if (lineIds.length > 0) {
//compute the position of the single el (top and bottom and make a div)
const el = window.document.getElementById(lineIds[0]);
top = el.offsetTop;
height = el.offsetHeight;
parent = el.parentElement.parentElement;
if (lineIds.length > 1) {
const lastEl = window.document.getElementById(lineIds[lineIds.length - 1]);
const bottom = lastEl.offsetTop + lastEl.offsetHeight;
height = bottom - top;
}
if (top !== null & & height !== null & & parent !== null) {
// cook up a div (if necessary) and position it
let div = window.document.getElementById("code-annotation-line-highlight");
if (div === null) {
div = window.document.createElement("div");
div.setAttribute("id", "code-annotation-line-highlight");
div.style.position = 'absolute';
parent.appendChild(div);
}
div.style.top = top - 2 + "px";
div.style.height = height + 4 + "px";
let gutterDiv = window.document.getElementById("code-annotation-line-highlight-gutter");
if (gutterDiv === null) {
gutterDiv = window.document.createElement("div");
gutterDiv.setAttribute("id", "code-annotation-line-highlight-gutter");
gutterDiv.style.position = 'absolute';
const codeCell = window.document.getElementById(targetCell);
const gutter = codeCell.querySelector('.code-annotation-gutter');
gutter.appendChild(gutterDiv);
}
gutterDiv.style.top = top - 2 + "px";
gutterDiv.style.height = height + 4 + "px";
}
selectedAnnoteEl = annoteEl;
}
};
const unselectCodeLines = () => {
const elementsIds = ["code-annotation-line-highlight", "code-annotation-line-highlight-gutter"];
elementsIds.forEach((elId) => {
const div = window.document.getElementById(elId);
if (div) {
div.remove();
}
});
selectedAnnoteEl = undefined;
};
// Attach click handler to the DT
const annoteDls = window.document.querySelectorAll('dt[data-target-cell]');
for (const annoteDlNode of annoteDls) {
annoteDlNode.addEventListener('click', (event) => {
const clickedEl = event.target;
if (clickedEl !== selectedAnnoteEl) {
unselectCodeLines();
const activeEl = window.document.querySelector('dt[data-target-cell].code-annotation-active');
if (activeEl) {
activeEl.classList.remove('code-annotation-active');
}
selectCodeLines(clickedEl);
clickedEl.classList.add('code-annotation-active');
} else {
// Unselect the line
unselectCodeLines();
clickedEl.classList.remove('code-annotation-active');
}
});
}
const findCites = (el) => {
const parentEl = el.parentElement;
if (parentEl) {
const cites = parentEl.dataset.cites;
if (cites) {
return {
el,
cites: cites.split(' ')
};
} else {
return findCites(el.parentElement)
}
} else {
return undefined;
}
};
var bibliorefs = window.document.querySelectorAll('a[role="doc-biblioref"]');
for (var i=0; i< bibliorefs.length ; i + + ) {
const ref = bibliorefs[i];
const citeInfo = findCites(ref);
if (citeInfo) {
tippyHover(citeInfo.el, function() {
var popup = window.document.createElement('div');
citeInfo.cites.forEach(function(cite) {
var citeDiv = window.document.createElement('div');
citeDiv.classList.add('hanging-indent');
citeDiv.classList.add('csl-entry');
var biblioDiv = window.document.getElementById('ref-' + cite);
if (biblioDiv) {
citeDiv.innerHTML = biblioDiv.innerHTML;
}
popup.appendChild(citeDiv);
});
return popup.innerHTML;
});
}
}
});
< / script >
< / div > <!-- /content -->
< / body > < / html >
