diff --git a/index.qmd b/index.qmd
index cd2af05..ffdd38c 100644
--- a/index.qmd
+++ b/index.qmd
@@ -17,6 +17,48 @@ John Paul Helveston
June 15, 2023
George Washington University
:::
+
+
+
+
+### Downloads
+
+
+
+::: {.grid}
+
+::: {.g-col-3}
+
+:::
+
+::: {.g-col-3}
+
+::: {.class-buttons}
+
+ All slides
+
+:::
+
+:::
+
+::: {.g-col-3}
+
+::: {.class-buttons}
+
+ Software
+
+:::
+
+:::
+
+::: {.g-col-3}
+
+:::
+
+:::
+
+
+
::: {.grid}
::: {.g-col-6}
diff --git a/parts/2023-qux-conf-conjoint.pdf b/parts/2023-qux-conf-conjoint.pdf
new file mode 100644
index 0000000..c192fcf
Binary files /dev/null and b/parts/2023-qux-conf-conjoint.pdf differ
diff --git a/render.R b/render.R
index a236943..df5b2ec 100644
--- a/render.R
+++ b/render.R
@@ -21,3 +21,16 @@
# Render site
quarto::quarto_render()
+
+# Merge slide pdfs into single file
+
+pdfs <- c(
+ file.path("parts", "introduction", "introduction.pdf"),
+ file.path("parts", "designing-surveys", "designing-surveys.pdf"),
+ file.path("parts", "estimating-models", "estimating-models.pdf"),
+ file.path("parts", "fielding-surveys", "fielding-surveys.pdf")
+)
+pdftools::pdf_combine(
+ input = pdfs,
+ output = file.path('parts', '2023-qux-conf-conjoint.pdf')
+)