Herstel voor laatste org versie.

diff --git a/source/assets/golden_spiral-coord_polar-fail.png b/source/assets/golden_spiral-coord_polar-fail.png
index 5ff82decb7211632ad2a55085074bc4e89a75d08..62b9bc4ab12870113c9452912e409041444e89f3 100644 (file)
Binary files a/source/assets/golden_spiral-coord_polar-fail.png and b/source/assets/golden_spiral-coord_polar-fail.png differ

diff --git a/source/assets/golden_spiral-ggplot-coord-fixed.png b/source/assets/golden_spiral-ggplot-coord-fixed.png
index 6c6d2bf244f79d8490c0dddb464f8843355b30d6..880311b159bea3cdbf1ff9a5a41f6c7d6f1b38ca 100644 (file)
Binary files a/source/assets/golden_spiral-ggplot-coord-fixed.png and b/source/assets/golden_spiral-ggplot-coord-fixed.png differ

diff --git a/source/assets/golden_spiral-plotrix.png b/source/assets/golden_spiral-plotrix.png
index dd659916172ac50ac43f0e4806c70823831312ce..7cdd3cbd8903c9bcf613b2aec77cb6445d7ef407 100644 (file)
Binary files a/source/assets/golden_spiral-plotrix.png and b/source/assets/golden_spiral-plotrix.png differ

diff --git a/source/posts/Fibonacci_golden_spiral.org b/source/posts/Fibonacci_golden_spiral.org
index c4eeed8b9f9d2adeac9ebbfb9685a0ea21a47d00..948ac3ca20a215e274b3875f5456bbd4bd21faca 100644 (file)
--- a/source/posts/Fibonacci_golden_spiral.org
+++ b/source/posts/Fibonacci_golden_spiral.org
@@ -3,7 +3,7 @@
 #+LANGUAGE: en\r
 #+PROPERTY: session *R* \r
 #+PROPERTY: cache yes \r
-#+PROPERTY: results graphics \r
+#+PROPERTY: results file graphics \r
 #+PROPERTY: exports both \r
 #+PROPERTY: tangle yes \r
 #+OPTIONS: toc:nil  \r
@@ -301,17 +301,17 @@ dist_from_origin <- sapply(seq_theta,polar_golden_spiral)
 | 46.7443082659106 |\r
 \r
 Plotting the function using coord_polar in ggplot2 does not work as intended. Unexpectedly, the x axis keeps extending instead of circling back once a full circle is reached. Turns out coord_polar might not really be intended to plot elements in polar vector format.\r
-#+BEGIN_SRC R :session R :results output graphics :file ../pics/golden_spiral-coord_polar-fail.png :exports both\r
+#+BEGIN_SRC R :session R :results output file graphics :file ../assets/golden_spiral-coord_polar-fail.png :exports both\r
 ggplot(data.frame(x = seq_theta, y = dist_from_origin), aes(x,y)) +\r
     geom_point() +\r
     coord_polar(theta="x")\r
 #+END_SRC\r
 \r
 #+RESULTS:\r
-[[file:../pics/golden_spiral-coord_polar-fail.png]]\r
+[[file:../assets/golden_spiral-coord_polar-fail.png]]\r
 \r
 To ensure what I was trying to do is possible, I employ a specialised plotfunction instead\r
-#+BEGIN_SRC R :session R :results output graphics :file ../pics/golden_spiral-plotrix.png :exports both\r
+#+BEGIN_SRC R :session R :results output file graphics :file ../assets/golden_spiral-plotrix.png :exports both\r
 plotrix::radial.plot(dist_from_origin, seq_theta,rp.type="s", point.col = "blue")\r
 #+END_SRC\r
 \r
@@ -339,7 +339,7 @@ df <- data.frame(t(serie))
 \r
 * Result\r
 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.\r
-#+BEGIN_SRC R :session R :results output graphics :file ../pics/golden_spiral-ggplot-coord-fixed.png :width 800 :height 800 :exports both\r
+#+BEGIN_SRC R :session R :results output file graphics :file ../assets/golden_spiral-ggplot-coord-fixed.png :width 800 :height 800 :exports both\r
 ggplot(df, aes(x=X1,y=X2)) +\r
     geom_path(color="blue") +\r
     theme(panel.grid.minor = element_blank(),\r