Répéter une séquence répétée

Nous voulons obtenir un tableau qui ressemble à ceci:

1,1,1,2,2,2,3,3,3,4,4,4,1,1,1,2,2,2,3,3,3,4,4,4,1,1,1,2,2,2,3,3,3,4,4,4

Quelle est la meilleure façon de le faire?

source d'informationauteur Fabian Stolz

  1. 33

    Vous pouvez le faire avec un seul rep appel. Le each et times paramètres sont évalués de manière séquentielle avec la each être fait en premier.

    rep(1:4, times=3, each=3)
#[1] 1 1 1 2 2 2 3 3 3 4 4 4 1 1 1 2 2 2 3 3 3 4 4 4 1 1 1 2 2 2 3 3 3 4 4 4
  2. 17

    Ou, plus simple (en supposant que vous voulez dire un vecteur, pas un tableau)

    rep(rep(1:4,each=3),3)
  3. 2

    Comme ceci:

    rep(sapply(1:4, function(x) {rep(x, 3)}), 3)

    rep(x, N) retourne un vecteur de répéter x N fois. sapply s'applique la fonction à chaque élément du vecteur 1:4 séparément, en répétant chaque élément 3 fois consécutivement.

  4. 2

    Cela ne fonctionnera que si votre séquence de nombres augmente par incréments de 1. Cependant, si vous souhaitez inclure une séquence de chiffres qui augmentent par un intervalle défini (par exemple de 0 à 60 par 15) vous pouvez le faire:

    rep(seq(0,60,15), times = 3)
[1]  0 15 30 45 60  0 15 30 45 60  0 15 30 45 60

    Vous avez juste à changer le nombre de fois que vous le souhaitez répéter.

  5. 0

    Ici est une méthode à l'aide de la matrice de manipulation avec aperm. L'idée est de construire un tableau contenant les valeurs. Les réorganiser afin qu'elles correspondent à la sortie désirée à l'aide de apermet puis "déplier" le tableau avec c.

    c(aperm(array(1:4, dim=c(4,3,3)), c(2, 1, 3)))
 [1] 1 1 1 2 2 2 3 3 3 4 4 4 1 1 1 2 2 2 3 3 3 4 4 4 1 1 1 2 2 2 3 3 3 4 4 4