R로 1900년부터 2100년까지 윤년을 출력해보겠습니다.

구글 위키에서 찾아본 윤년의 규칙은 다음과 같습니다.

1.윤년의 규칙

그레고리력의 정확한 윤년 규칙은 다음과 같다.

  • 서력 기원 연수가 4로 나누어떨어지는 해는 윤년으로 한다.(1988년, 1992년, 1996년, 2004년, 2008년, 2012년 …)
  • 이 중에서 100으로 나누어떨어지는 해는 평년으로 한다.(1900년, 2100년, 2200년, 2300년, 2500년 …)
  • 그중에 400으로 나누어떨어지는 해는 윤년으로 둔다.(1600년, 2000년, 2400년 …)

출처: 윤년의 규칙

2. 코딩하기

  • for문을 사용하여 1900~2100까지 나열합니다.
  • 윤년의 규칙대로 나눗셈(%%), “==”, “!=”을 사용하여 조건문을 만듭니다.
  • 다음 조건을 만족하는 결과에 윤년이라는 문장을 추가합니다.
1
2
3
4
5
6
for (year in 1900:2100){
    if(year %% 4 == 0 & year %%100 != 0 | year %% 400 == 0){
        result <- paste(year, "는 윤년입니다.")
        print (result)
    }
}