숫자 반복하기

Coddy R 여정의 기초 섹션에 포함된 레슨 — 78개 중 54번째.

챌린지

쉬움

이전 레슨에서 단일 숫자를 처리하는 fizzbuzz 함수를 만들었습니다. 이제 1부터 주어진 제한까지의 숫자 범위를 처리하는 루프를 추가하세요.

코드를 다음과 같이 수정하세요:

입력에서 숫자 n을 읽습니다 (이것이 상한선이 됩니다).
for 루프를 사용하여 1부터 n까지 반복합니다.
범위 내의 각 숫자에 대해 fizzbuzz 함수를 호출하고 결과를 출력합니다.

각 결과는 print()를 사용하여 새 줄에 출력되어야 합니다.

예를 들어, 입력이 다음과 같다면:

출력은 다음과 같아야 합니다:

[1] "1"
[1] "2"
[1] "Fizz"
[1] "4"
[1] "Buzz"

만약 입력이 다음과 같다면:

출력은 다음과 같아야 합니다:

[1] "1"
[1] "2"
[1] "Fizz"
[1] "4"
[1] "Buzz"
[1] "Fizz"
[1] "7"
[1] "8"
[1] "Fizz"
[1] "Buzz"
[1] "11"
[1] "Fizz"
[1] "13"
[1] "14"
[1] "FizzBuzz"

직접 해보기

# Read input
con <- file("stdin", "r")
number <- as.numeric(suppressWarnings(readLines(con, n = 1)))

# Function from previous lesson
check_divisible <- function(number, divisor) {
  return(number %% divisor == 0)
}

# Create the fizzbuzz function
fizzbuzz <- function(n) {
  if (check_divisible(n, 3) && check_divisible(n, 5)) {
    return("FizzBuzz")
  } else if (check_divisible(n, 3)) {
    return("Fizz")
  } else if (check_divisible(n, 5)) {
    return("Buzz")
  } else {
    return(as.character(n))
  }
}

# Call the fizzbuzz function and print the result
print(fizzbuzz(number))