小编Hei*_*kki的帖子

R MarkDown和R NoteBook之间的区别

我试图在高层次上理解R Markdown和之间的区别R NoteBook.我知道它们是相互关联的,但我想弄清楚它们是如何相关的.我的理解是这样的:

我知道RNotebooks真的是R Markdown文档,但我对术语感到困惑.

RStudio新文件选项有R Markdown和,R NoteBook并且选择其中任何一个打开R Markdown文件但有细微差别.所以只是想弄清楚为什么有两种选择,两者之间有什么区别?

在此输入图像描述

我知道R笔记本是新推出的,R Makrdown已经存在了一段时间.部分混乱可能是因为我R Markdown在引入R Notebook之前从未使用过,所以我的相关或更具体的问题是

什么是R NoteBook不同于仅使用R MarkDown或R NoteBook带来了哪些新功能?

我在网络搜索上的所有点击都指出R笔记本使用R Markdown但我没有找到任何帮助,两者之间的具体差异.

r rstudio knitr r-markdown rnotebook

107
推荐指数
6
解决办法
3万
查看次数

如何在闪亮的应用程序中使Kable Table React()?闪亮+电缆

我正在尝试使电缆表具有反应性,并将其导出到闪亮的应用程序中。已经尝试在服务器内部使用renderDataTable/ renderTable,并且将输出功能作为datatableOutput/ 进行了尝试tableOutput,但是没有运气,下面是代码行。

  output$tableset <- renderDataTable({
kable(spread_bole) %>%
  kable_styling(font_size = 15 ,bootstrap_options = c("striped","hover", "condensed")) })

tableOutput("tableset")      
Run Code Online (Sandbox Code Playgroud)

r shiny kableextra kable

7
推荐指数
1
解决办法
1727
查看次数

R stop() 函数中的域参数有什么作用?

运行功能时

stop("m<0", domain=NA)
Run Code Online (Sandbox Code Playgroud)

domain 的默认设置是NULL,但是当您将其设置为 时会发生什么NA?我试图将域更改为此,但它似乎没有做任何不同的事情。报告的错误消息是相同的。

error-handling r

5
推荐指数
1
解决办法
130
查看次数

Cypress 测试 - Google Places 自动完成功能不工作

我正在尝试使用 Cypress 作为我正在开发的 Angular 网站的测试工具。其中一项测试是针对位置搜索,它使用 google 地点服务来自动完成位置。运行正常,如下图所示:

功能自动完成

但是,在 cypress 测试中,不会出现自动完成元素,因此无法选择位置来继续搜索。测试正在触发它应该让它出现的方法,但它没有。如果我也手动输入 cypress 浏览器,它也会出现。

有谁知道可能是什么原因造成的?

google-places angular cypress

5
推荐指数
1
解决办法
1902
查看次数

Python中的递归堆栈

我正在尝试了解以下 python 递归函数的调用堆栈。该函数给出给定集合的所有组合。

def subsets(A):
    if not A:
        yield []
    else:
        for s in subsets(A[1:]):
            yield s
            yield [A[0]] + s
l1=[1,2,3]
print(list(subsets(l1)))
Run Code Online (Sandbox Code Playgroud)

该程序正在根据需要生成输出:

[[], [1], [2], [1, 2], [3], [1, 3], [2, 3], [1, 2, 3]]
Run Code Online (Sandbox Code Playgroud)

但是我无法可视化调用堆栈。它怎么能打印[1,2,3]?我的理解如下

call stack 1 : values are : for s in [2,3], a[0] = 1, a = [1,2,3]
call stack 2 : values are : for s in [3], a[0] = 2, a = [2,3]
call stack 3 : values are …
Run Code Online (Sandbox Code Playgroud)

python recursion callstack

5
推荐指数
1
解决办法
97
查看次数

有没有办法将 3d 数组的 2d 矩阵乘以 R 中的标量?

我有一个 2x2x10 的单位矩阵数组,用

arr = array(diag(2), dim=c(2,2,10))
Run Code Online (Sandbox Code Playgroud)

我希望将该数组中的每个 2x2 矩阵乘以一个标量 c(1:10)

z = arr[,,1:10] * c(1:10)
Run Code Online (Sandbox Code Playgroud)

但是,我得到了意想不到的结果。的前三个2×2矩阵z如下所示

, , 1

     [,1] [,2]
[1,]    1    0
[2,]    0    4

, , 2

     [,1] [,2]
[1,]    5    0
[2,]    0    8

, , 3

     [,1] [,2]
[1,]    9    0
[2,]    0    2
Run Code Online (Sandbox Code Playgroud)

我错过了什么吗?

arrays r matrix

5
推荐指数
1
解决办法
66
查看次数

地板和天花板有2位或更多位数

可以使用signif以下结果将结果舍入为两位有效数字:

> signif(12500,2)
[1] 12000
> signif(12501,2)
[1] 13000
Run Code Online (Sandbox Code Playgroud)

但有一个同样方便的功能,如虚拟下方的功能signif.floorsignif.ceiling,这样我就可以得到两个或两个以上显著数字与地板或天花板?

> signif.ceiling(12500,2)
[1] 13000
> signif.floor(12501,2)
[1] 12000
Run Code Online (Sandbox Code Playgroud)

编辑:

现有signif函数使用负数和十进制数.

因此,可能的解决方案最好也可以使用负数:

> signif(-125,2)
[1] -120
> signif.floor(-125,2)
[1] -130
Run Code Online (Sandbox Code Playgroud)

和十进制数:

> signif(1.23,2)
[1] 1.2
> signif.ceiling(1.23,2)
[1] 1.3
Run Code Online (Sandbox Code Playgroud)

作为特例,0也应该返回0:

> signif.floor(0,2)
[1] 0
Run Code Online (Sandbox Code Playgroud)

r significant-digits

4
推荐指数
1
解决办法
1381
查看次数

如何检查精确向量是否是列表中另一个向量的子集

我浏览了类似的帖子并尝试了它们,但仍然无法解决我的问题。

我有一个向量列表,如下所示

y2 <- c(0,0,NA,0,0,0,0)
y <- c(0,0,0,NA,NA,0)
x <- c(0,0,0,0)
li <-list(y2,y,x)
Run Code Online (Sandbox Code Playgroud)

li如果确切的向量是另一个向量的子集,我正在尝试从列表中删除该向量。

例如,在我的情况下,我应该有y2y结果并x从列表中删除,因为它xy2.

我编写了以下脚本,但它只给出了 y2 作为结果,而忽略了y

UniquePath <- function(PATHS)
{
  for(j in length(PATHS):1)
  {
    for(i in 1:length(PATHS))
    {
      if((i!=j)&(isTRUE(all(is.element(PATHS[[j]],PATHS[[i]])))))
      {
        PATHS<-PATHS[-j]
        break
      }
      else
      {
        next
      }
    }
  }
  return(PATHS)
}
Run Code Online (Sandbox Code Playgroud)

r subset

4
推荐指数
1
解决办法
364
查看次数

使用 nginx 作为反向代理与 keycloak 作为上游服务器的组合失败

我们是 nginx 新手,并试图用它替换 httpd。我们有以下 nginx 配置:

location /auth {
      proxy_pass http://keycloak_server$request_uri;

      proxy_http_version 1.1;

      proxy_set_header Host               $host;
      proxy_set_header X-Real-IP          $remote_addr;
      proxy_set_header X-Forwarded-For    $proxy_add_x_forwarded_for;
      proxy_set_header X-Forwarded-Proto  https;
}
Run Code Online (Sandbox Code Playgroud)

这适用于提供对管理员门户的访问。然而,我们也使用 keycloak 对我们的应用程序进行身份验证,问题是 keycloak 以 302 重定向响应,但 nginx 将其视为 502 错误网关错误。

apache httpd 工作没有任何问题。我们做错了什么?任何指针或特定的配置指南将不胜感激。

nginx keycloak nginx-reverse-proxy

3
推荐指数
1
解决办法
2068
查看次数

python 包串行已重命名为 pyserial 吗?

一个简单的问题,因为我正在学习通过 python 设置串行连接。我在谷歌上搜索了相应的软件包,在互联网上主要发现了两个:serialpyserial

然而,似乎只能找到 的文档pyserial,尽管两者都有很多 stackoverflow 条目。

难道是这个serial包已经改名了pyserial

python pyserial

3
推荐指数
1
解决办法
4219
查看次数