Pedir a los usuarios de ESS/R sugerencias para códigos elisp en el archivo .emacs

Question

Creo que no todos los usuarios de R conocen elisp. Sería bueno si los usuarios de ESS pudieran compartir su código en su archivo .emacs aquí. Un código bien comentado sería particularmente útil. Espero que esto promueva el uso de ESS por los usuarios R.

Answer 1

Para mí, esto es increíblemente útil:

;; ESS: Emacs Speaks Statistics 
(load "~/elisp/vendor/ess/lisp/ess-site.el") 

;; Use shift-enter to split window & launch R (if not running), execute highlighted 
;; region (if R running & area highlighted), or execute current line 
;; (and move to next line, skipping comments). Nice. 
;; See http://www.emacswiki.org/emacs/EmacsSpeaksStatistics, 
;; FelipeCsaszar. Adapted to spilit vertically instead of 
;; horizontally. 

(setq ess-ask-for-ess-directory nil) 
    (setq ess-local-process-name "R") 
    (setq ansi-color-for-comint-mode 'filter) 
    (setq comint-prompt-read-only t) 
    (setq comint-scroll-to-bottom-on-input t) 
    (setq comint-scroll-to-bottom-on-output t) 
    (setq comint-move-point-for-output t) 
    (defun my-ess-start-R() 
    (interactive) 
    (if (not (member "*R*" (mapcar (function buffer-name) (buffer-list)))) 
     (progn 
    (delete-other-windows) 
    (setq w1 (selected-window)) 
    (setq w1name (buffer-name)) 
    (setq w2 (split-window w1 nil t)) 
    (R) 
    (set-window-buffer w2 "*R*") 
    (set-window-buffer w1 w1name)))) 
    (defun my-ess-eval() 
    (interactive) 
    (my-ess-start-R) 
    (if (and transient-mark-mode mark-active) 
    (call-interactively 'ess-eval-region) 
     (call-interactively 'ess-eval-line-and-step))) 
    (add-hook 'ess-mode-hook 
     '(lambda() 
      (local-set-key [(shift return)] 'my-ess-eval))) 
    (add-hook 'inferior-ess-mode-hook 
     '(lambda() 
      (local-set-key [C-up] 'comint-previous-input) 
      (local-set-key [C-down] 'comint-next-input))) 
    (require 'ess-site) 

Tomado de: http://www.kieranhealy.org/blog/archives/2009/10/12/make-shift-enter-do-a-lot-in-ess/

Answer 2

En Debian/Ubuntu, utilizo el paquete ESS que requiere hay entradas adicionales en absoluto .emacs ya que utiliza la configuración de todo el sistema de /etc/emacs/site-start.d/50ess.el. En Windows, tengo que configurar la ruta a Rterm.exe y fuente ess-site.el, tal como lo sugiere el manual de ESS.

que tienen, sin embargo esto ... que es una copia casi directamente de los que hace referencia el Manual del R 'Extensiones:

;; edd 12 May 2006 from R-exts.texi 
;;     with one variation 
;;; C 
(add-hook 'c-mode-hook 
      ;;(lambda() (c-set-style "bsd"))) 
      (lambda() (c-set-style "c++"))) ; edd 
;;;; ESS 
(add-hook 'ess-mode-hook 
      (lambda() 
      (ess-set-style 'C++) 
      ;; Because 
      ;;         DEF GNU BSD K&R C++ 
      ;; ess-indent-level     2 2 8 5 4 
      ;; ess-continued-statement-offset 2 2 8 5 4 
      ;; ess-brace-offset     0 0 -8 -5 -4 
      ;; ess-arg-function-offset   2 4 0 0 0 
      ;; ess-expression-offset    4 2 8 5 4 
      ;; ess-else-offset     0 0 0 0 0 
      ;; ess-close-brace-offset   0 0 0 0 0 
      (add-hook 'local-write-file-hooks 
         (lambda()  
         (ess-nuke-trailing-whitespace))))) 
;(setq ess-nuke-trailing-whitespace-p 'ask)  
;; or even 
(setq ess-nuke-trailing-whitespace-p t)