I'm having a bit of trouble with org bable and R. When I try to execute the
code below (C-c C-c on the call line), as you can see, I get the results
:nil

---------------------------------------
#+tblname: tableTestBabel
|   0 | 4.40 |
|  30 | 4.54 |
|  60 | 7.09 |
|  90 | 9.40 |
| 120 | 9.22 |
| 150 | 6.65 |
| 180 | 4.22 |

#+srcname: chartPolAngle(pol)
#+begin_src R
  angle <- pol[,1]
  energy <- pol[,2]
  plot(angle,energy)
  energy.model <-  nls (energy ~ a1 + a2 * (sin(pi / a3 *(angle-a4)))^2,
start=list(a1=3.0, a2=7.0, a3=180, a4=0.0))
  lines(spline(angle, fitted.values(energy.model)), lwd=2)
  summary(energy.model)
#+end_src

#+call: chartPolAngle(pol=tableTestBabel) :session testBabel:file
testBabel.pdf

#+results: chartPolAngle(pol=tableTestBabel)
: nil
------------------------------------

but If I move the header arguments to the source block, as in the code
below, everything works fine. I also get asked "ESS [S(R): R] starting data
directory? ~/doc/org/" which I don't get with the code above.

---------------------------------------
#+tblname: tableTestBabel
|   0 | 4.40 |
|  30 | 4.54 |
|  60 | 7.09 |
|  90 | 9.40 |
| 120 | 9.22 |
| 150 | 6.65 |
| 180 | 4.22 |

#+call: chartPolAngle(pol=tableTestBabel)

#+results: chartPolAngle(pol=tableTestBabel)
: testBabel.pdf


#+srcname: chartPolAngle(pol)
#+begin_src R :session testBabel :file testBabel.pdf
  angle <- pol[,1]
  energy <- pol[,2]
  plot(angle,energy)
  energy.model <-  nls (energy ~ a1 + a2 * (sin(pi / a3 *(angle-a4)))^2,
start=list(a1=3.0, a2=7.0, a3=180, a4=0.0))
  lines(spline(angle, fitted.values(energy.model)), lwd=2)
  summary(energy.model)
#+end_src
---------------------------------------

Org doesn't appear to respect the head arguments on the call. I pulled from
git a couple days ago. Any ideas why?

Cheers
Chris Witte