Diamond

Ringkasan Tantangan

Given a letter, print a diamond starting with 'A' with the supplied letter at the widest point.

Visit the diamond exercise on Exercism to read the full instructions and download the exercise files.

Community Solutions

Lihat Solusi Komunitas

The following are the top 3 community solutions by stars:

Solution 1 by @jonmcalder (⭐ 3) — View on Exercism
Solution 2 by @xarxziux (⭐ 0) — View on Exercism
Solution 3 by @schlandi (⭐ 0) — View on Exercism

Source: Exercism r/diamond

💡 Lihat Solusi

diamond <- function(letter) {
  
  nrows <- which(LETTERS == letter)
  
  row_x <- function(x) {
    row <- rep(" ", nrows * 2 - 1)
    row[nrows - (x - 1)] <- LETTERS[x]
    row[nrows + (x - 1)] <- LETTERS[x]
    paste(row, collapse = "")
  }