小编Chr*_*oph的帖子

我刚开始在 rstudio 中进行调试。一开始，一切都按照这里的描述进行。

使用 后browser()，我无法回到此状态，这意味着没有交互字段，我可以在其中按hide traceback或return with debug按钮。有谁知道，出了什么问题？

• 以上建议无效。
• traceback() 有效，但该消息不再具有交互性。
• options(error = function(){.rs.breakOnError(TRUE)})从这里https://support.rstudio.com/hc/en-us/community/posts/202296047-error-recovery将值设置为 TRUE，但仍然没有出现交互式回溯。

RStudio 版本

平台 x86_64-w64-mingw32
arch x86_64
os mingw32
system x86_64, mingw32
status
major 3
minor 2.2
year 2015
month 08
day 14
svn rev 69053
language R
version.string R version 3.2.2 ( 2014)-0安全昵称

如果您还需要所有options()设置，请告诉我。

2018 年 11 月编辑：运行带有错误的脚本，交互式回溯处于活动状态。

getOption("error")
(function () 
{
    .rs.recordTraceback(FALSE, 5, .rs.enqueueError)
})()

销毁交互式回溯（不知道，我做了什么）：

getOption("error")
(function () 
{ …

我的R安装在中C:\R\R-3.3.0。但：

> R.home()
[1] "C:/R/R-33~1.0"
> Sys.getenv("R_HOME")
[1] "C:/R/R-33~1.0"

我认为两者都应该是"C:/R/R-3.3.0"因为使用调试器时我遇到了很多麻烦：它只是找不到库！

在Windows上，我在文档中阅读了此内容，但没有帮助：

在Windows上，如果需要并且已启用Windows服务的R.home（）和R_HOME的值，则将它们切换为路径元素的8.3短格式。R_HOME的值设置为使用正斜杠（因为许多软件包维护人员将其不加引号的形式传递给shell，例如在'Makefile's中）。

非常感谢您的帮助，因为我对环境变量的了解很少。

我有一个像

a <- 1
# A very long comment, perhaps copy paste from somewhere containing the word ?t.

我想搜索非 UTF-8 编码。我怎样才能在 RStudio 中做到这一点？

初学者的一个问题：git历史记录有多种搜索方式。对我来说，不清楚命令之间的区别到底是什么：

1. git log，例如git log -S 'for what you search' --all在所有分支中搜索字符串并 git log -G 'search for regexpr' --all搜索 regexpr。例如参见这里
2. git log --grep 'pattern'
3. git rev-list，例如git rev-list --grep='string' --all
4. git grep，例如git grep "string or regexpr" $(git rev-list --all)从这里
5. gitk，例如gitk file.txtGUI 界面
6. git log --all --full-history -- **/thefile.*从这里搜索历史记录中的文件名。
7. git diff --word-diff-regex=. > changes.txt结合grep -oP '\+[^\+]+\+' changes.txt | tr -d '\+'显示基于字符的变化。从这里。如果尚未提交更改，这甚至可以工作。

我的理解很差

• git …

假设我有一个在 integer 上使用循环的函数i。现在出了点问题，我假设错误发生在i=5. 现在我可以逐步完成每一步（到目前为止我所做的）。

但现在我看了一下condition和text论证browser和debug：

text输入浏览器时可以检索的文本字符串。
条件 进入浏览器时可以检索的条件。

是否可以按照我想要的方式使用参数？

这是一个例子。调试器/浏览器应该只在i=5到达后启动：

fun <- function(x, y, n) {
  result <- 0
  for (i in 1:n) {
    # browser(condition = (i == 5)) # does not work
    result <- result + i * ( x + y)
  }
  return(result)
}

x <- 2
y <- 3
n <- 10

# debug(fun, condition = (i == 5)) # does …

如标题中所述：如何使用匹配调用？
我试过

http://router.project-osrm.org/match/v1/driving/8.610048,46.99917;8.530232,47.051?overview=full&radiuses=49;49

我不确定radiuses列出的列表是否正确。我无法让它发挥作用。我也尝试过[49;49]或{49;49}该命令适用于route：

http://router.project-osrm.org/route/v1/driving/8.610048,46.99917;8.530232,47.051?overview=full

背景请看这里

编辑：如果您查看此处的示例，itr 似乎timestamps不需要/match/v1/{profile}/{coordinates}?steps={true|false}&geometries={polyline|polyline6|geojson}&overview={simplified|full|false}&annotations={true|false}

我想做以下工作

---
title: "Untitled"
author: "SQC"
date: "21 September 2018"
output: html_document
---

\newcommand{\short}{AreallylongwordIhavetotypefrequently}

# My Test
I would like to write \short which does not work, $\short$ however is close... 
Snippets do not work in Rmd plain text (= Rstudio's "Shift", see link below).

但我找不到解决方案.如果周围有什么东西会很棒!以下链接很有帮助,但没有提出解决方案:pandoc doc,Rmd公式中的\newcommand和RStudio片段.

Is it possible, to make the black line thinner? Here's a reproducible example, see also here:

library(leaflet)
leaflet() %>%
  addTiles() %>%
  addProviderTiles(providers$OpenStreetMap, group = "OSM") %>%
  addProviderTiles(providers$Stamen.TonerLite, group = "Toner Lite") %>%
  addLayersControl(baseGroups = c("OSM", "Toner Lite")) %>% 
  leaflet::addCircleMarkers(lat = 0,
                            lng = 0,
                            color = "black",
                            fillColor = "red",
                            stroke = TRUE,
                            popup = "hello",
                            radius = 10,
                            fillOpacity = 0.7)

我找到了几个例子（如何使用 R 提取 SQL 文件的内容， 使用循环在 rmarkdown 中生成文本部分，使用 R在 Rmarkdown中 自动生成预格式化文本），但在我的情况下没有一个适用于嵌套部分，包括数字. 预期输出：

看来，我需要某种方法来处理包含的代码块（例如cat("```{r, fig.width=8.4, fig.height=7}\n") ... cat("```\n")正确处理，但我找不到方法。

编辑：我在这里找到了这个，但仍然无法使它工作

kexpand <- function(chunkname, fig.width, fig.height) {
  cat(knitr::knit(text = knitr::knit_expand(text = 
     sprintf("```{r %s, fig.width=%s, fig.height=%s}\n.chunk_code\n", 
             chunkname, fig.width, fig.height))))
}

然后在块中：

  .chunk_code <- leaflet() %>%
    addTiles() %>%
    addProviderTiles(providers$OpenStreetMap, group = "OSM") %>%
    addProviderTiles(providers$Stamen.TonerLite, group = "Toner Lite") %>%
    addLayersControl(baseGroups = c("OSM", "Toner Lite")) %>%
    addCircleMarkers(lat = 47, lng = 9, popup = ranges[i]) …

我对 RStudio 和 Git 很陌生，所以我想确保我正确理解我在做什么。

Git 文档说这git revert会创建一个新的提交。当我按下 RStudio 恢复按钮时，没有创建新的提交，它只是回到上次提交。对我来说，这似乎是一个git reset --hard. 我做错了什么吗？