Yeni Yılınız Kutlu Olsun!

for(i in c(1:6, 4:9, 5:12, 8:15, rep(3,5)))
  cat( paste0(strrep(" ", 15 - i), strrep("* ", i), "\n") )

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

print("***Herkese Mutlu Yıllar***")

## [1] "***Herkese Mutlu Yıllar***"