#+PROPERTY: tangle ./test.R

* Internal configurations                                          :noexport:
** Evaluate to run post tangle script
#+begin_src emacs-lisp :results silent :tangle no :exports none
    (add-hook 'org-babel-post-tangle-hook
              (lambda ()
                (message "running the post-tangle shell script")
                (shell-command "bash ./postTangleScript.sh")))
#+end_src

** Post tangle script
#+begin_src sh :tangle postTangleScript.sh :results silent
touch PostTangleScriptHasBeenExecuted
#+end_src

* Two blocks
Block 1
#+begin_src R
  suitName <- function(species)
                    {
                      return( paste(species$layer, "suitability", sep="_") )
                    }
#+end_src  

Block 2
#+begin_src R
  statDistName <- function(species){
      return( paste(species$layer, "disturbances_static", sep="_") )
  }
#+end_src