Add the documentation generation scripts

Author: krassowski

R_example.ipynb

@@ -0,0 +1,12 @@
+destination: docs
+
+home:
+  title: UpSet (Venn diagrams alternative) plots extensible with ggplot2 geoms
+  description: Get all the goodies of UpSet, but with full extensibility of ggplot2
+
+template:
+  opengraph:
+    twitter:
+      creator: "@krassowski"
+      card: summary_large_image
+

_pkgdown.yml

@@ -2,4 +2,3 @@ pandas
 pydataset
 jupyterlab
 rpy2
-scikit_learn

requirements.txt

@@ -0,0 +1,10 @@
+#!/usr/bin/env bash
+set -e
+echo "Compiling Python examples"
+../scripts/expand_run_magic.py Examples.ipynb Examples_Python.ipynb
+jupyter nbconvert --execute --to notebook --inplace Examples_Python.ipynb
+echo "Compiling R examples"
+../scripts/translate_examples.py Examples.ipynb _R_Examples.ipynb
+../scripts/expand_run_magic.py _R_Examples.ipynb Examples_R.ipynb
+jupyter nbconvert --execute --to notebook --inplace Examples_R.ipynb
+echo "Done"

scripts/compile_examples.sh

@@ -0,0 +1,16 @@
+#!/usr/bin/env bash
+set -e
+Rscript -e 'devtools::document()'
+cd vignettes
+../scripts/compile_examples.sh
+cd ..
+for v in Examples_Python Examples_R
+do
+    jupyter nbconvert  --to markdown "vignettes/${v}.ipynb" 
+    mv "vignettes/${v}.md" "vignettes/${v}.Rmd"
+    sed 's/```r/```{r eval=FALSE}/g' "vignettes/${v}.Rmd" -i
+    sed 's/```python/```{python eval=FALSE}/g' "vignettes/${v}.Rmd" -i
+    sed 's/\[png\]/[ ]/g' "vignettes/${v}.Rmd" -i
+    sed -i "1s/^/---\ntitle: \"${v}\"\n---\n/" "vignettes/${v}.Rmd"
+done
+Rscript -e 'pkgdown::build_site()'

scripts/document.sh

@@ -0,0 +1,36 @@
+#!/usr/bin/env python3
+import sys
+import json
+
+input_path = sys.argv[1]
+output_path = sys.argv[2]
+
+exapnded = 0
+
+with open(input_path) as f:
+    nb_in = json.load(f)
+
+    new_cells = []
+
+    for cell in nb_in['cells']:
+        if cell['cell_type'] != 'code':
+            new_cells.append(cell)
+            continue
+        code = ''.join(cell['source'])
+        if code.startswith('%run'):
+            to_include = code[5:].strip()
+            with open(to_include) as o:
+                nb_run = json.load(o)
+            new_cells.extend(nb_run['cells'])
+            expanded = 1
+        else:
+            new_cells.append(cell)
+
+assert expanded
+print(f'Expanded {expanded} run magics')
+
+with open(output_path, 'w') as f:
+    nb_in['cells'] = new_cells
+    json.dump(nb_in, f)
+
+print(f'Saved as {output_path}')

scripts/expand_run_magic.py

@@ -0,0 +1,74 @@
+#!/usr/bin/env python3
+import sys
+import json
+import re
+
+python_input_path = sys.argv[1]
+r_output_path = sys.argv[2]
+
+prepare_changed = False
+
+print(f'Will translate Python exampels from {python_input_path} into R examples')
+
+with open(python_input_path) as f:
+    nb_in = json.load(f)
+
+    new_cells = []
+
+    for cell in nb_in['cells']:
+        if cell['cell_type'] == 'code':
+            first = cell['source'][0].strip()
+            #code = ''.join(cell['source'])
+            if first.strip() == '%run Prepare_Python.ipynb':
+                cell['source'] = [
+                    '%run Prepare_R.ipynb'
+                ]
+                prepare_changed = True
+            elif first.startswith('%%R'):
+                first = first[4:].strip()
+                if first:
+                    args = first.split(' ')
+                    args = {
+                        args[i*2]: args[i*2 + 1]
+                        for i in range(len(args)//2)
+                    }
+                    assert args
+                    w = int(args["-w"]) / 100
+                    h = int(args["-h"]) / 100
+                    if round(w) == w:
+                        w = int(w)
+                    else:
+                        w = f'{w:.1f}'
+                    if round(h) == h:
+                        h = int(h)
+                    else:
+                        h = f'{h:.1f}'
+                    first = f'set_size({w}, {h})\n'
+                cell['source'][0] = first
+            elif first.startswith('%R'): 
+                first = first[2:].strip()
+                cell['source'][0] = first
+        new_cells.append(cell)
+
+assert prepare_changed
+
+with open(r_output_path, 'w') as f:
+    nb_in['metadata'] = {
+      "kernelspec": {
+       "display_name": "R",
+       "language": "R",
+       "name": "ir"
+      },
+      "language_info": {
+       "codemirror_mode": "r",
+       "file_extension": ".r",
+       "mimetype": "text/x-r-source",
+       "name": "R",
+       "pygments_lexer": "r",
+       "version": "3.6.1"
+      }
+     }
+    nb_in['cells'] = new_cells
+    json.dump(nb_in, f)
+
+print(f'Saved as {r_output_path}')