[R] 두 정수 사이의 짝수곱 계산하기 (feat. while문)

해당 포스트에서는 R을 이용하여 양의 정수 m, n 사이의 짝수의 곱을 계산하는 방법을 설명합니다.

1. INTRO

네이버 지식iN에서 지식을 공유하고 있습니다. 간단한 질문들은 해당 질문에 바로 답변을 드리지만 질문의 내용이 유익하거나 추가 설명이 필요한 경우에는 포스팅을 작성하여 공유드리고 있습니다.

2. 질문

▲ 네이버 지식인 질문

3. 풀이

이번 문제는 양의 정수 m, n 사이의 짝수들의 곱을 while문을 이용하여 구하는 문제입니다. while문의 경우, 종료 조건을 정확히 정의하지 않으면 무한루프(계산이 무한대로 일어나는 현상)에 빠질 수 있기에 항상 코드 실행 전 확인을 하셔야 합니다.

함수 작성

저는 위 문제를 사용자 함수(my_function)을 만들어 풀었습니다. 결과값을 저장할 변수(result)를 정의하고 my_function에서는 두 개의 정수(m,n)을 인자로 받아 1씩 증가시키며 짝수 여부를 판단(m %% 2 == 0, 2로 나눈 나머지가 0인 값)합니다.

반복문은 입력값인 m을 1씩 증가시키며 짝수일 경우 result에 곱해주고, m값이 n과 같아지게 되면 반복문을 종료하게 됩니다.

R Script

result <- 1

my_function <- function(m, n){

  while(m<n){

    if (m %% 2 == 0){

      result <- result * m
      m = m + 1

    } else {

      m = m + 1
      next
    }

  }

  if (n %% 2 == 0){
    result <- result * n
  }

  return(result)
}
my_function(2, 9)
## [1] 384

my_function(2, 12)
## [1] 46080 

4. 마무리

이번 포스트에서는 R에서 두 양의 정수 mn 사이의 모든 짝수의 곱을 구하는 방법을 설명드렸습니다. 프로그래밍을 공부하시면서 짝수/홀수 판단하는 로직을 응용하는 경우가 많으니 조금씨 수정해 보시면서 학습하시면 공부에 도움이 되실 것 같습니다.


banner-request-analysis