Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 如何创建正反顺序_R_Sequence - Fatal编程技术网

R 如何创建正反顺序

R 如何创建正反顺序,r,sequence,R,Sequence,我目前正在研究r,以使自己达到最佳状态。 正在尝试创建一个 (-10,101001000) 我的第一个问题是如何创建一个在积极和消极之间交替的序列 其次,我如何创建一个序列,该序列每x个数将自身乘以10。您可以使用rep和cumprod创建一个序列,该序列将自身乘以10,并与c(-1,1)相乘,以在正负之间交替: 另一个想法是 rep(10^seq(3), each = 2) * c(-1, 1) #[1] -10 10 -100 100 -1000 1000 只是添加了一个

我目前正在研究r,以使自己达到最佳状态。 正在尝试创建一个

(-10,101001000)

我的第一个问题是如何创建一个在积极和消极之间交替的序列


其次,我如何创建一个序列,该序列每x个数将自身乘以10。

您可以使用
rep
cumprod
创建一个序列,该序列将自身乘以10,并与
c(-1,1)
相乘,以在正负之间交替:

另一个想法是

rep(10^seq(3), each = 2) * c(-1, 1)
#[1]   -10    10  -100   100 -1000  1000
只是添加了一个基准。结果是,
cumprod
速度很快

microbenchmark(sotos = rep(10 ^ seq(30), each = 2) * c(-1, 1), 
               GKi = rep(cumprod(rep(10, 30)), each = 2) * c(-1, 1))

问题还不清楚。您能提供一个示例的预期输出吗?
microbenchmark(sotos = rep(10 ^ seq(30), each = 2) * c(-1, 1), 
               GKi = rep(cumprod(rep(10, 30)), each = 2) * c(-1, 1))
Unit: microseconds
  expr   min    lq    mean median    uq    max neval
 sotos 6.911 7.212 7.83658  7.512 7.513 30.348   100
   GKi 1.502 1.803 2.03470  1.804 2.104 11.118   100