小编Aur*_*des的帖子

使用plotyly或Network3D将ggraph转换为交互式图

我正在寻找将ggraph对象转换为迭代力网络的示例或教程。

首先我尝试plotly使用函数转换为对象plotly::ggplotly。但似乎plotly不能很好地处理这种转换并且错过了边缘。

但我发现network3D,我可以将一个igraph对象转换为一个network3D对象,但这不是我想要的。而且这个包的功能太冗长了。无论如何,没有从ggraph对象转换的函数。

所以,我的问题非常基本,但是...您知道创建交互式ggraph网络的任何方法吗?

谢谢

interactive r plotly force-layout ggraph

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

用简单的calc内存不足?

我得到out of memory一个非常简单的计算。

我尝试计算由于二叉树可能给了许多n样本的许多拓扑

因此,我简单尝试一下“ perl -E 'sub fac{ my ($n) = @_; $n == 1 ? 1 : $n * fac($n -1)} sub top{ my ($n) = @_; $t = fac(2 * $n - 5) / (2 ** ($n - 3) * fac($n - 3) ) } say top(3)' Also”,同样数学的另一个版本:

#!/usr/bin/env perl

use warnings;
use strict;
#use features;

sub factorial{
        my ($n) = @_;
        $n == 1 ? 1 : $n * factorial($n -1)
} …
Run Code Online (Sandbox Code Playgroud)

perl

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

如何使用 case_when 而不是 if_else [我的代码中有错误?]

我试图意识到为什么我不能使用dplyr::case_when而不是dplyr::if_else.
可能我错过了一些东西。让我解释:

我得到了这个工作正常的操作:

df %>%
  mutate(
    keep = if_else(
      assembly_level != "Complete Genome" | genome_rep != "Full",
      FALSE,
      ifelse(
        version_status == "suppressed",
        FALSE,
        if_else(
          refseq_category %in% c("reference genome", "representative genome"),
          TRUE,
          if_else(
            rpseudo > 0.4,
            FALSE,
            TRUE
          )
        )
      )
    )
  )
Run Code Online (Sandbox Code Playgroud)

但是,当我尝试使用case_when这种方式时

df %>%
  mutate(
    keep = case_when(
      assembly_level != "Complete Genome" | genome_rep != "Full" ~ FALSE, 
      version_status == "suppressed" ~ FALSE,
      refseq_category %in% c("reference genome", "representative genome") ~ TRUE, 
      rpseudo > …
Run Code Online (Sandbox Code Playgroud)

r vectorization case-when dplyr tidyverse

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