在 r 中打印一个三角形

Question

我正在尝试编写一些代码来提供如下所示的输出：

鉴于我有限的 r 经验，我得到的最接近的是：

for(i in 1:5) {
  print(strrep("*", i))
}

for(i in 4:1) {
  print(strrep("*", i))
}

这给了我：

# *
# **
# ***
# ****
# *****

and

# ****
# ***
# **
# *

任何指导都会很有帮助。

提前致谢！

Answer 1

额外填充space

for(i in c(1:5, 4:1))
  cat( paste0(strrep(" ", 5 - i), strrep("* ", i), "\n") )

    * 
   * * 
  * * * 
 * * * * 
* * * * * 
 * * * * 
  * * * 
   * * 
    *

在 r 中打印一个三角形

Printing a triangle in r

visualization

r

shapes