生成许多​​序列

发布于 2025-01-22 12:37:09 字数 686 浏览 0 评论 0原文

我想生成以下序列:

myseq <- seq(0,0.1, by=0.0001)
myseq <- seq(0,0.2, by=0.0001)
myseq <- seq(0,0.3, by=0.0001)
.
.
. 
myseq <- seq(0,1, by=0.0001)
myseq <- seq(0.1,0.2, by=0.0001)
myseq <- seq(0.1,0.3, by=0.0001)
myseq <- seq(0.1,0.4, by=0.0001)
.
.
.
myseq <- seq(0.9,1, by=0.0001) # I want to stop here. 

我尝试手动以下代码,但我的直觉似乎并不正确:

#Counters
from=0
to=0.1
a = seq(from, to, by=0.001)

#I execute following to check if my intuition is correct. 

from=case_when(to<=0.9 ~ from,
                 to==1 ~ from+0.1)
  
to=case_when(to<0.9 ~ to+0.1,
               to==1 ~ 1)
  
a = seq(from, to, by=0.0001) 

I would like to generate following sequences:

myseq <- seq(0,0.1, by=0.0001)
myseq <- seq(0,0.2, by=0.0001)
myseq <- seq(0,0.3, by=0.0001)
.
.
. 
myseq <- seq(0,1, by=0.0001)
myseq <- seq(0.1,0.2, by=0.0001)
myseq <- seq(0.1,0.3, by=0.0001)
myseq <- seq(0.1,0.4, by=0.0001)
.
.
.
myseq <- seq(0.9,1, by=0.0001) # I want to stop here. 

I tried with following code manually but my intuition does not seem to be correct here:

#Counters
from=0
to=0.1
a = seq(from, to, by=0.001)

#I execute following to check if my intuition is correct. 

from=case_when(to<=0.9 ~ from,
                 to==1 ~ from+0.1)
  
to=case_when(to<0.9 ~ to+0.1,
               to==1 ~ 1)
  
a = seq(from, to, by=0.0001) 

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

把昨日还给我 2025-01-29 12:37:09

使用combn创建seq's 的矩阵,和 参数,然后在seq 使用mapply创建序列列表。

comb <- combn(seq(0, 1, by = 0.1), m = 2)
mapply(function(x, y) seq(x, y, by = 0.0001), comb[1,], comb[2,])

Use combn to create a matrix of seq's from and to parameters, and then apply them on seq using mapply to create the list of sequences.

comb <- combn(seq(0, 1, by = 0.1), m = 2)
mapply(function(x, y) seq(x, y, by = 0.0001), comb[1,], comb[2,])
~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文