小编sah*_*ahn的帖子

随机生成总和为 1 的概率

我试图生成三个概率,它们的总和一定为 1。我尝试了以下操作:

x <- sample(seq(0.05,0.95,0.05), size=3)
x <- boom/sum(boom)
Run Code Online (Sandbox Code Playgroud)

但是,我希望生成的数字是保留两位小数的分数,即从 0.05 到 0.95 的数字,步长为 0.05(这样它们的总和也为 1)。上面的代码生成的数字的问题是它们可能有很多或无限的小数位。我怎样才能实现我所需要的?有人做过类似的事情吗?

r

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

如何在不检查代码的情况下合并拉取请求?(获取 github YOLO 徽章)

如何在不检查代码的情况下合并拉取请求?(获得 GitHub YOLO 徽章)

github

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

如何制作渐变彩虹调色板图?

我正在尝试制作一个类似于我在 R 中附加的照片的图表。我将使用分类数据而不是照片中所示的数字。首先,这种类型的图表叫什么?其次,是否有一个函数可以帮助我在 R 中重新创建与此类似的图表?您会推荐任何软件包吗?或者这可以与基础 R 一起使用吗?

在此输入图像描述

r

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

为什么 std::shared_ptr 中的计数器是原子的?

_Sp_counted_base使用原子计数器的实现:

_Atomic_word  _M_use_count;     // #shared
_Atomic_word  _M_weak_count;    // #weak + (#shared != 0)
Run Code Online (Sandbox Code Playgroud)

为什么计数器是原子的而指针不是?原子计数有必要吗?有没有例子说明其必要性?

(因为std::shared_ptr不是线程安全的,所以我认为原子计数是没有必要的。)

c++ shared-ptr

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

为什么“5”+“9”给出 110?

我正在学C。110这个答案怎么样?

   #include <stdio.h>
   void main()

    {
         char c1,c2,sum ;
         c1='5';
         c2='9';
         sum= c1+c2;
         printf("sum=%d",sum);

    }
Run Code Online (Sandbox Code Playgroud)

c

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

是否可以在 ggplot2 中使用 geom_smooth 显示标准差?

我目前使用 geom_smooth 函数来绘制细菌生长数据。

我想知道是否可以显示标准差而不是由标准误差计算的置信区间(我认为这是该函数的标准)

例子:

p1<-mtcars %>%
  ggplot(aes(x=mpg,cyl)) +
  geom_smooth( size=2, span=1,color="tomato",fill="tomato")
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

所以我的问题是:

  1. 是否可以使用 geom_smooth 显示运行标准差?
  2. 如果没有,还有其他方法可以实现这一目标吗?

预先非常感谢!

plot r ggplot2 dplyr

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

跨多列的pivot_longer,如何使用names_pattern参数

df_wide <- structure(list(name = c("Crushers GC", "4Aces GC"), first_name = c("Charles", 
"Peter"), last_name = c("Howell III", "Uihlein"), first_name_1 = c("Paul", 
"Pat"), last_name_1 = c("Casey", "Perez"), first_name_2 = c("Bryson", 
"Dustin"), last_name_2 = c("DeChambeau", "Johnson"), first_name_3 = c("Anirban", 
"Patrick"), last_name_3 = c("Lahiri", "Reed")), row.names = c(NA, 
-2L), class = c("tbl_df", "tbl", "data.frame"))

name        first_name last_name  first_name_1 last_name_1 first_name_2 last_name_2 first_name_3 last_name_3
  <chr>       <chr>      <chr>      <chr>        <chr>       <chr>        <chr>       <chr>        <chr>      
1 Crushers GC Charles    Howell III Paul         Casey       Bryson       DeChambeau  Anirban      Lahiri …
Run Code Online (Sandbox Code Playgroud)

r tidyr

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

R 中的plot() - 如何对两条垂直线之间的区域进行着色?

如何对图中标有两条红色垂直线的区域进行着色?(阴影区域不得受曲线限制)

plot(1980:2019,y,type="l")
abline(v=1990,col="red")
abline(v=2001,col="red")
Run Code Online (Sandbox Code Playgroud)

提前致谢。

在此输入图像描述

plot r colors

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

如何根据名称对列表中的文件进行分组?

我有4个文件:

MCD18A1.A2001001.h15v05.061.2020097222704.hdf

MCD18A1.A2001001.h16v05.061.2020097221515.hdf

MCD18A1.A2001002.h15v05.061.2020079205554.hdf

MCD18A1.A2001002.h16v05.061.2020079205717.hdf
Run Code Online (Sandbox Code Playgroud)

我想在列表中按名称(日期:A2001001 和 A2001002)对它们进行分组,如下所示:

[[MCD18A1.A2001001.h15v05.061.2020097222704.hdf, MCD18A1.A2001001.h16v05.061.2020097221515.hdf], [MCD18A1.A2001002.h15v05.061.2020079205554.hdf, MCD18A1.A2001002.h16v05.061.2020079205717.hdf]]
Run Code Online (Sandbox Code Playgroud)

我使用 Python 完成了此操作,但我不知道如何使用 R:

# Seperate files by date
MODIS_files_bydate = [list(i) for _, i in itertools.groupby(MODIS_files, lambda x: x.split('.')[1])]
Run Code Online (Sandbox Code Playgroud)

filenames split group-by r python-itertools

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

当 x=0x80000000,y = 1(32 位补码)时,为什么 `x - y &lt;= x` 为真?

我想知道是否x - y溢出。

下面是我的代码。

#include <stdio.h>

/* Determine whether arguments can be subtracted without overflow */
int tsub_ok(int x, int y)
{
    return (y <= 0 && x - y >= x) || (y >= 0 && x - y <= x);
}

int main()
{
    printf("0x80000000 - 1 : %d\n", tsub_ok(0x80000000, 1));
}
Run Code Online (Sandbox Code Playgroud)

为什么我不能得到我期望的结果?

c

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

标签 统计

r ×6

c ×2

plot ×2

c++ ×1

colors ×1

dplyr ×1

filenames ×1

ggplot2 ×1

github ×1

group-by ×1

python-itertools ×1

shared-ptr ×1

split ×1

tidyr ×1