使用循环从矩阵中创建向量

时间:2015-04-26 13:34:33

标签: r loops matrix vector

我试图通过使用循环组合多个矩阵来创建矢量。 如果我手动执行它看起来像这样:

vector = c(
           matrix(labels[1],ccl$size[1]), 
           matrix(labels[2],ccl$size[2]), 
           matrix(labels[3],ccl$size[3]),
           matrix(labels[4],ccl$size[4]),
           matrix(labels[5],ccl$size[5]))

标签是具有给定数量元素的向量,ccl $ size也是如此。问题是没有循环似乎接受函数的任何子串作为有价值的输入。

编辑:我试过了

c(for(i in repeats) 
{matrix(labels[i],ccl$size[i]),}
)

edit2:

输入 标签:c(2,1,3)

ccl $ size:c(12,10,7)

期望的输出 C(2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,3,3, 3,3,3,3,3)

1 个答案:

答案 0 :(得分:2)

您正在寻找v1 <- c(2,1,3) v2 <- c(12, 10, 7) rep(v1, v2) # [1] 2 2 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 1 1 3 3 3 3 3 3 3

#!/bin/bash
time=$(date +%H%M)
if [ $time -eq "0825" ]; then
php /var/lib/openshift/55375281e0b8cdb702000011/app-root/runtime/repo/php/test.php
fi