[1] " *"
[1] " * *"
[1] " * * *"
[1] " * * * *"
[1] " * * * * *"
[1] " * * * * * *"
[1] " * * * * * * *"
[1] " * * * * * * * *"
[1] " * * * * * * * * *"
[1] " * * * * * * * * * *"

이거를 출력하는 거는

string<-""
for(i in 1:10){
  string<-paste(string,"☆")
  print(string)
}

이렇게 쉽게 나왔는데

[1] " * * * * * * * * * *"
[1] " * * * * * * * * *"
[1] " * * * * * * * *"
[1] " * * * * * * *"
[1] " * * * * * *"
[1] " * * * * *"
[1] " * * * *"
[1] " * * *"
[1] " * *"
[1] " *"

이렇게 역삼각형으로 출력하는 거는 못 하겠습니다. print횟수를 역으로 해야 하는 건데 제가 아직 배운 게 없어선지 어떻게 해야할지 잘 모르겠네요. 한번 for로 하는 방법을 알면 while이나 repeat으로 하는 것도 쉬울 것 같은데...