Thorsten Jolitz <tjol...@gmail.com> writes:

> For editing the property-drawer of the first headline in full Org-mode,
> use outorg.el. 
>
> This is how the *outorg-edit-buffer* looks after doing C-u M-# M-#
> (outorg-edit-as-org) on the first headline (to convert and edit only the
> subtree at point, use M-# M-#):
>
> | * code
> | ** My first R Function
> | 
> | simple example function from the manual
> | #+begin_example
> | twosam <- function(y1, y2) {
> |          n1  <- length(y1); n2  <- length(y2)
> |          yb1 <- mean(y1);   yb2 <- mean(y2)
> |          s1  <- var(y1);    s2  <- var(y2)
> |          s <- ((n1-1)*s1 + (n2-1)*s2)/(n1+n2-2)
> |          tst <- (yb1 - yb2)/sqrt(s*(1/n1 + 1/n2))
> |          tst
> |        }
> | #+end_example
>
> [ups, I see a bug ... sources should be wrapped into #+begin_src R blocks]

This should be fixed now, I associated (ess . R) but it should rather be
(ess-mode . R), now outorg recognizes ESS/R mode and converts code to
R code-blocks instead of example blocks:

,--------------------------------------------------
| ** My first R Function
| 
| simple example function from the manual
| #+begin_src R
| twosam <- function(y1, y2) {
|          n1  <- length(y1); n2  <- length(y2)
|          yb1 <- mean(y1);   yb2 <- mean(y2)
|          s1  <- var(y1);    s2  <- var(y2)
|          s <- ((n1-1)*s1 + (n2-1)*s2)/(n1+n2-2)
|          tst <- (yb1 - yb2)/sqrt(s*(1/n1 + 1/n2))
|          tst
|        }
| #+end_src
`--------------------------------------------------


-- 
cheers,
Thorsten


Reply via email to