Добавьте несколько ярлыков в режим ESS Jags - PullRequest
Новая
       5

Добавьте несколько ярлыков в режим ESS Jags

3 голосов
/ 29 января 2011

Я относительно новичок в анализе данных emacs и байесовской системы и в программном обеспечении JAGS. Я хотел бы изменить файл ess jags-d.el, чтобы иметь ярлык F8 для <- </strong>, как в режиме R с использованием ESS. Является ли это возможным ?

Я надеюсь, что мой вопрос понятен, и извините за мой плохой английский.

Ответы [ 2 ]

2 голосов
/ 30 января 2011

К сожалению ess-smart-underscore не будет работать в режиме ошибок.

Простой ответ будет: 

(define-key ess-bugs-mode-map [f8] (lambda() (interactive) (insert " <- ")))

это просто связывает f8 для вставки <-.

Чтобы добиться того же поведения в ошибках, что и в ess, добавьте в ваш .emacs следующее: 

(define-key ess-bugs-mode-map (kbd "_") 'bugs-smart-underscore)

(defun bugs-smart-underscore ()
  (interactive)
  (let ((assign-len (length ess-S-assign)))
    (if (and
         (>= (point) (+ assign-len (point-min))) ;check that we can move back
         (save-excursion
           (backward-char assign-len)
           (looking-at ess-S-assign)))
        ;; If we are currently looking at ess-S-assign, replace it with _
        (progn
          (delete-backward-char assign-len)
          (insert "_"))
      (delete-horizontal-space)
      (insert ess-S-assign))))

Теперь, нажав _ один раз, вы получите <-, дважды - _.

2 голосов
/ 29 января 2011

Я не использую JAGS, но насколько я вижу в руководстве по ESS:

Изменения / Новые функции в 5.4:

ESS [BUGS] и ESS [JAGS]: печатать = сейчас результаты в <-. </p>

...