如何使用 RStudio 热键在 R / RShiny App 中编码折叠括号 ()?

问题描述

我在 R 中一直使用代码折叠 + 代码折叠热键来保持我的脚本有条理。如果一切都在函数中,函数完成工作,那么折叠的代码非常整洁。

我们如何编写代码折叠下面的 dashboardBody() 调用?如果我在第 32 行和第 33 行之间添加 #####,第 33 行下面的整个脚本会折叠成一个折叠,这是有问题的,因为我只希望dashboardBody() 函数在这里折叠成自身。

enter image description here

我试过这个,我把整个东西都用花括号包裹起来

ui_body <- {dashboardBody(

  # Shiny HTML Tags 
  tags$script(HTML("$('body').addClass('fixed');")),tags$head(tags$style(HTML(css_fixed_sidebar))),tags$head(tags$style(HTML(css_dashboard_body_white))),tags$head(tags$style(HTML(css_nyk_grey_header))),# UI Body for this page
  tabItems(
    create_ui__glossary(id = NA) # NA for no server module
  )
)}

...虽然代码折叠图标确实出现在这里

enter image description here

...这是有问题的,因为 (a) 如果 dashboardBody() 仍然显示会更好,比如函数名称在折叠时的显示方式(尽管这可能不可能),更重要的是 (b ) 由于某种原因,RStudio 代码折叠热键(Windows 上的 ALT-O)由于某种原因无法折叠此部分,因此我必须手动单击箭头来折叠此代码,这违背了使用的目的代码折叠整个脚本的热键。

还有其他方法吗?

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)