R中代表不均匀

Question

我有一个问题，关于如何每次和每次不均匀地重复数字。我有以下代码，并很难格式化它。对于这个例子，我希望重复数字“1”10次，然后重复“2”2次，然后重复10次循环

df <- rep(c("1","2"), each = c(10,2), times = 10)

最后，它将是

1 1 1 1 1 1 1 1 1 1 2 2 1 1 1 1 1 1 1 1 1 1 2 2.....

或

的10个周期

1 1 1 1 1 1 1 1 1 1 2 2

谢谢！