Invalid Function while using setq

Invalid Function while using setq

[sapsi]

Hello,
I have the following function in my .emacs (or rather Preferences.el
on Aquamacs)

 (defun send-to-R-app ()
        (interactive)
  "Sends the selection to R.App"
  (let ( (myStr2 nil) (mystr nil))(
		(setq mystr (buffer-substring-no-properties (mark) (point)))
		(setq myStr2 (replace-regexp-in-string "\"" "'" mystr ) )
		(do-applescript (concat "tell application \"R\" \r"
		       "cmd "
		        "\"" myStr2 "\""
 		       "\r"
		       "end tell"
		       ))
		) ))
  (global-set-key (kbd "A-r")
                   'send-to-R-app)

When i start emacs, i get this error
 `(setq mystr (buffer-substring-no-properties (mark) (point)))' is a
malformed function.

I have no idea why, also if select the code fragement and type M-x
eval-region and then select some code and type M-x send-to-R-app, i
get a similar error
Invalid function setq mystr (buffer-substring-no-properties (mark)
(point)))

Could someone help me out on this?
Thank you
Saptarshi

Re: Invalid Function while using setq

[Lennart Borgman (gmail)]

sapsi wrote:
> Hello,
> I have the following function in my .emacs (or rather Preferences.el
> on Aquamacs)
> 
>  (defun send-to-R-app ()
>         (interactive)
>   "Sends the selection to R.App"
>   (let ( (myStr2 nil) (mystr nil))(

Remove the last ( above.

> 		(setq mystr (buffer-substring-no-properties (mark) (point)))
> 		(setq myStr2 (replace-regexp-in-string "\"" "'" mystr ) )
> 		(do-applescript (concat "tell application \"R\" \r"
> 		       "cmd "
> 		        "\"" myStr2 "\""
>  		       "\r"
> 		       "end tell"
> 		       ))
> 		) ))
>   (global-set-key (kbd "A-r")
>                    'send-to-R-app)
> 
> When i start emacs, i get this error
>  `(setq mystr (buffer-substring-no-properties (mark) (point)))' is a
> malformed function.
> 
> I have no idea why, also if select the code fragement and type M-x
> eval-region and then select some code and type M-x send-to-R-app, i
> get a similar error
> Invalid function setq mystr (buffer-substring-no-properties (mark)
> (point)))

Re: Invalid Function while using setq

[Joel J. Adamson]

sapsi <saptarshi.guha@gmail.com> writes:

> Hello,
> I have the following function in my .emacs (or rather Preferences.el
> on Aquamacs)
>
>  (defun send-to-R-app ()

If the R you want is R, then you want ESS (ess.r-project.org).

Joel

-- 
Joel J. Adamson
Biostatistician
Pediatric Psychopharmacology Research Unit
Massachusetts General Hospital
Boston, MA  02114
(617) 643-1432
(303) 880-3109