윤년

윤년 여부를 판단하는 함수아래는 주어진 연도 벡터에 대해 윤년인지 여부를 반환하는 간단한 함수입니다.is.leapyear=function(year){ # Leap year return(((year %% 4 == 0) & (year %% 100 != 0)) | (year %% 400 == 0)) }