Browse Source

This should have been part of the parent commit (911e77a7c966ec5d073c67bc153e197d5edb9fd9)

Dan Davison 16 years ago
parent
commit
e4d14d41ec
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/langs/org-babel-R.el

+ 1 - 1
lisp/langs/org-babel-R.el

@@ -92,7 +92,7 @@ called by `org-babel-execute-src-block' via multiple-value-bind."
 (defvar org-babel-R-wrapper-method "main <- function ()\n{\n%s\n}
 (defvar org-babel-R-wrapper-method "main <- function ()\n{\n%s\n}
 write.table(main(), file=\"%s\", sep=\"\\t\", na=\"nil\",row.names=FALSE, col.names=%s, quote=FALSE)")
 write.table(main(), file=\"%s\", sep=\"\\t\", na=\"nil\",row.names=FALSE, col.names=%s, quote=FALSE)")
 
 
-(defun org-babel-R-evaluate (buffer body result-type colnames)
+(defun org-babel-R-evaluate (buffer body result-type column-names-p)
   "Pass BODY to the R process in BUFFER.  If RESULT-TYPE equals
   "Pass BODY to the R process in BUFFER.  If RESULT-TYPE equals
 'output then return a list of the outputs of the statements in
 'output then return a list of the outputs of the statements in
 BODY, if RESULT-TYPE equals 'value then return the value of the
 BODY, if RESULT-TYPE equals 'value then return the value of the