如何使用r中的循环结构创建像55555,4444,333,22,1这样的模式

Question

如何在R中使用循环结构创建像55555,4444,333,22,1这样的模式?

55555
4444
333
22
1

我的尝试:

for(x in 5:1){
cat(x)
print(x)
}

我输出:

5[1] 5
4[1] 4
3[1] 3
2[1] 2
1[1] 1

Answer 1

你可以这样做:

n <- 5
for(x in n:1){
cat(rep(x, x), 'n')
}
#5 5 5 5 5 
#4 4 4 4 
#3 3 3 
#2 2 
#1 

另一个没有循环的版本:

n1 <- n:1
cat(paste0(strrep(n1, n1), collapse = 'n'))