From 3232fcb524ce3ae488d155539d0a9b256791af81 Mon Sep 17 00:00:00 2001 From: Frederik Vanrenterghem Date: Thu, 28 Dec 2023 14:35:13 +0800 Subject: [PATCH] Zorg dat post index pagina semantisch correct is. --- html/post-index.mustache | 16 ++++++++-------- maak-website.el | 6 +++--- source/posts/Fibonacci_golden_spiral.org | 6 +----- source/posts/explore-AU-road-fatalities.org | 8 ++++---- 4 files changed, 16 insertions(+), 20 deletions(-) diff --git a/html/post-index.mustache b/html/post-index.mustache index 7883bbd..e581eff 100644 --- a/html/post-index.mustache +++ b/html/post-index.mustache @@ -10,19 +10,19 @@
-
+
-
+
{{{contents}}} -
-
- - + + + + {{>footer}} diff --git a/maak-website.el b/maak-website.el index 10f2e6a..565a5d0 100644 --- a/maak-website.el +++ b/maak-website.el @@ -9,7 +9,7 @@ (setq org-html-htmlize-output-type 'css) ; default: 'inline-css (setq org-time-stamp-custom-formats '("%A %e %B %Y" . "%A %e %B %Y at %H:%M")) (setq org-display-custom-times t) -(setq org-html-container-element "section") ;; TODO - check +(setq org-html-container-element "div") ;; TODO - check (setq my-blog-base-folder "~/websites/stage.vanrenterghem.biz") (setq my-blog-source-folder "~/websites/stage.vanrenterghem.biz/source") (setq my-blog-target-folder "~/websites/stage.vanrenterghem.biz/target") @@ -161,10 +161,10 @@ Either the section between #+BEGIN_PREVIEW and +#END_PREVIEW is used, or the fir (insert "#+END_export\n") (insert preview) ;(insert (concat "#+INCLUDE: \"" relpath "\" :only-contents t :lines \"1-10\"\n")) - (insert "\n") + (insert "\n") (insert (concat "[[file:" relpath "][Read More...]]\n")) (insert "#+BEGIN_export html\n") - (insert "<\/section>\n") + (insert " \n") (insert "#+END_export\n") )) ;; kill the first hrule to make this look OK diff --git a/source/posts/Fibonacci_golden_spiral.org b/source/posts/Fibonacci_golden_spiral.org index 90abf9a..14ba5b0 100644 --- a/source/posts/Fibonacci_golden_spiral.org +++ b/source/posts/Fibonacci_golden_spiral.org @@ -10,10 +10,8 @@ #+OPTIONS: toc:nil #+date: <2019-09-16 22:03:03> -* What After having read the first part of a Rcpp tutorial which compared native R vs C++ implementations of a Fibonacci sequence generator, I resorted to drawing the so-called Golden Spiral using R. -* Details Libraries used in this example are the following #+BEGIN_SRC R :session R @@ -338,7 +336,6 @@ df <- data.frame(t(serie)) #+RESULTS: : TRUE -* Result With everything now ready in the right coordinate system, it's now only a matter of setting some options to make the output look acceptable. #+BEGIN_SRC R :session R :results output file graphics :file ../assets/golden_spiral-ggplot-coord-fixed.png :width 800 :height 800 :exports both ggplot(df, aes(x=X1,y=X2)) + @@ -356,5 +353,4 @@ ggplot(df, aes(x=X1,y=X2)) + y = "") #+END_SRC -* Note on how this post was written. -After a long hiatus, I set about using emacs, org-mode and ESS together to create this post. All code is part of an .org file, and gets exported to markdown using the orgmode conversion - C-c C-e m m. +Note on how this post was written: After a long hiatus, I set about using emacs, org-mode and ESS together to create this post. All code is part of an .org file, and gets exported to markdown using the orgmode conversion - C-c C-e m m. diff --git a/source/posts/explore-AU-road-fatalities.org b/source/posts/explore-AU-road-fatalities.org index ce66e5a..6c60f33 100644 --- a/source/posts/explore-AU-road-fatalities.org +++ b/source/posts/explore-AU-road-fatalities.org @@ -2,10 +2,6 @@ #+filetags: :R:analysis: #+title: Explore Australian road fatalities. -** Road fatalities in Australia -:PROPERTIES: -:CUSTOM_ID: road-fatalities-in-australia -:END: Recently inspired to doing a little analysis again, I landed on a dataset from [[https://bitre.gov.au/statistics/safety/fatal_road_crash_database.aspx]], @@ -15,6 +11,7 @@ great example of how governments are moving with the times! ** Trends :PROPERTIES: :CUSTOM_ID: trends +:HTML_CONTAINER_CLASS: card-body :END: I started by looking at the trends - what is the approximate number of road fatalities a year, and how is it evolving over time? Are there any @@ -33,6 +30,7 @@ differences noticeable between states? Or by gender? ** What age group is most at risk in city traffic? :PROPERTIES: :CUSTOM_ID: what-age-group-is-most-at-risk-in-city-traffic +:HTML_CONTAINER_CLASS: card-body :END: Next, I wondered if there were any particular ages that were more at risk in city traffic. I opted to quickly bin the data to produce a @@ -57,6 +55,7 @@ fatalities %>% ** Hypothesis :PROPERTIES: :CUSTOM_ID: hypothesis +:HTML_CONTAINER_CLASS: card-body :END: Based on the above, I wondered - are people above 65 more likely to die in slow traffic areas? To make this a bit easier, I added two variables @@ -130,6 +129,7 @@ prop.test(pensioners,everyone) ** Conclusion :PROPERTIES: :CUSTOM_ID: conclusion +:HTML_CONTAINER_CLASS: card-body :END: It's possible to conclude older people are over-represented in the fatalities in lower speed zones. Further ideas for investigation are -- 2.39.5