-
Notifications
You must be signed in to change notification settings - Fork 0
/
blog.qmd
50 lines (41 loc) · 1.3 KB
/
blog.qmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
---
title: "Libby's Blog"
listing:
contents: blog
type: default
image-align: left
fields:
- title
- description
- date
- image
- categories
categories: true
sort: "date desc"
page-size: 10
feed: true
format:
html: default
# include-after-body:
# - ./assets/html/subscribe.html
# - ./assets/html/buymecoffee.html
---
This is a messy, experimental, learning-out-loud space. It's also a sharing space where I can drop random "here's one way to do this thing" type of posts. My mission is to not curate the heck out of everything and to share the reality of what data work looks like for me. This means I'll get things wrong, I'll try things out, and I'll strive for fun over perfection.
I welcome conversation that is kind, curious, and courteous.
---
```{r, include=FALSE}
# Code snippet modified from Danielle Navarro
# https://blog.djnavarro.net/posts/2022-04-20_porting-to-quarto/#netlify-redirects
# list names of post folders
posts <- list.dirs(
path = here::here("blog"),
full.names = FALSE,
recursive = FALSE
)
# extract the slugs
slugs <- gsub("^.*_", "", posts)
# lines to insert to a netlify _redirect file
redirects <- paste0("/blog/", slugs, " ", "/blog/", posts)
# write the _redirect file
writeLines(redirects, here::here("_redirects"))
```