r - 在emacs ess中更改缩进

Question

This question is unlikely to help any future visitors; it is only relevant to a small geographic area, a specific moment in time, or an extraordinarily narrow situation that is not generally applicable to the worldwide audience of the internet. For help making this question more broadly applicable, visit the help center。




已关闭8年。




我想知道如何在emacs ess中更改缩进。
我通常喜欢默认值(ess-set-style'C++'quiet)
但是有时它的格式确实很奇怪。例如，这就是我想要的内容，如果它不属于该功能，则它将是默认格式:

  ggplot(data = overtime.by.month,
         aes(x="",
             y=Percent,
             fill = Overtime)) +
  geom_bar(width = 1) +
  xlab('') +
  ylab(sub.txt) +
  labs(title = title.txt) +
  facet_wrap(~Year.Month) +
  geom_text(aes(y = txt.pos, label = Per.txt)) +
  coord_polar(theta = "y") +
  scale_fill_manual(values = c('green', 'red')) +
  theme(axis.ticks = element_blank(),
        axis.text.y = element_blank(),
        axis.text.x = element_blank())

如果将其放在函数内部，这就是我使用当前缩进样式所得到的。

a <- function(){

    a <- ggplot(data = overtime.by.month,
                aes(x="",
                    y=Percent,
                    fill = Overtime)) +
                        geom_bar(width = 1) +
                            xlab('') +
                                ylab(sub.txt) +
                                    labs(title = title.txt) +
                                        facet_wrap(~Year.Month) +
                                            geom_text(aes(y = txt.pos, label = Per.txt)) +
                                                coord_polar(theta = "y") +
                                                    scale_fill_manual(values = c('green', 'red')) +
                                                        theme(axis.ticks = element_blank(),
                                                              axis.text.y = element_blank(),
                                                              axis.text.x = element_blank())
}

更新:重新安装后，我遵循了VitoshKa和Dirk的建议，并且更新.emacs问题消失了。感谢大伙们

UPDATE2:问题又回来了。我认为现在它对所有人都是可复制的。我试图在两台不同的机器上。当您将代码放入函数内部时，就会发生这种情况。我更新了帖子以反射(reflect)更改。

最佳答案

我懂了

ggplot(data = overtime.by.month,
       aes(x="",
           y=Percent,
           fill = Overtime)) +
    geom_bar(width = 1) +
    xlab('') +
    ylab(sub.txt) +
    labs(title = title.txt) +
    facet_wrap(~Year.Month) +
    geom_text(aes(y = txt.pos, label = Per.txt)) +
    coord_polar(theta = "y") +
    scale_fill_manual(values = c('green', 'red')) +
    theme(axis.ticks = element_blank(),
          axis.text.y = element_blank(),
          axis.text.x = element_blank())

我直接从R手册中使用默认值。

;; R-internals manual
;;; ESS
(add-hook 'ess-mode-hook
      (lambda ()
        (ess-set-style 'C++ 'quiet)
        ;; 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)
;; Perl
(add-hook 'perl-mode-hook
      (lambda () (setq perl-indent-level 4)))

您可以在注释中修改这些值。

关于r - 在emacs ess中更改缩进，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/12805873/

上一篇：javascript - 在前端访问 Firestore ID 生成器

下一篇：javascript - 如何更改 Three.js 中的相机类型？

相关文章：

r - 强制停止或出错时停止

r - 在 Shiny UI 中动态显示上传的图像

emacs - 如何绑定(bind) Emacs 键以在 shell 中删除整个单词 backword？

r - 启动 emacs 的本地安装时，如何加载服务器的特定 R 安装(环境模块)？

emacs - 在不更改字符的情况下突出显示emacs中的尾随空白

Emacs 自定义缩进

Remacs-ESS 未在 mac 上绘图

r - R Plotly 4.9.0 版中的 plotly_click 错误。新版本有bug吗？

r - 如何在 SPDF 中使用距离对多边形进行子集化

r - 将函数应用于由分类变量的所有可能组合子集的数据框

Answer 1

我懂了

ggplot(data = overtime.by.month,
       aes(x="",
           y=Percent,
           fill = Overtime)) +
    geom_bar(width = 1) +
    xlab('') +
    ylab(sub.txt) +
    labs(title = title.txt) +
    facet_wrap(~Year.Month) +
    geom_text(aes(y = txt.pos, label = Per.txt)) +
    coord_polar(theta = "y") +
    scale_fill_manual(values = c('green', 'red')) +
    theme(axis.ticks = element_blank(),
          axis.text.y = element_blank(),
          axis.text.x = element_blank())

我直接从R手册中使用默认值。

;; R-internals manual
;;; ESS
(add-hook 'ess-mode-hook
      (lambda ()
        (ess-set-style 'C++ 'quiet)
        ;; 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)
;; Perl
(add-hook 'perl-mode-hook
      (lambda () (setq perl-indent-level 4)))

您可以在注释中修改这些值。