예시 7.1: 피보나치 수열 만들기

R-Blogger · 블로그·해설 · 2009-06-17

R-Blogger블로그·해설한국어2009-06-17

예시 7.1: 피보나치 수열 만들기

피보나치 수와 SAS, R 예시 피보나치 수는 수학적 관계가 풍부하며 자연에서도 반복적으로 발견됩니다. 피보나치 수열은 1과 1로 초기화된 두 이전 값의 합으로 구성됩니다. 이 예제의 PDF는 여기에서 확인하실 수 있습니다. SAS에서는 lag 함수를 사용해 마지막 값을 가져옵니다 (섹션 1.4.17, p. 22 참조). 아래 예제 코드는 10개의 피보나치 수를 생성합니다. data fibo; do i = 1 to 10; fib = sum(fib, lag(fib)); if i eq 1 then fib = 1; output; end; run; proc print data=fibo; run; 이 코드는 다음과 같은 결과를 생성합니다. (표는 예시이며 정확한 수치는 코드를 실행해 확인하세요.) R에서는 배열을 순회하면서 동일한 작업을 수행할 수 있습니다. # 예시 R 코드 fib <- numeric(10) for (i in 1:10) { if (i == 1) { fib[i] <- 1 } else { fib[i] <- fib[i-1] + fib[i-2] } } print(fib)
원문 URL
전체 글은 원문 페이지에서 이어서 읽을 수 있습니다.
원문에서 전체 글 읽기
작성자
R-Blogger
출처
R-Blogger
플랫폼
R-Blogger
분류
블로그·해설
언어
한국어
발행일
2009-06-17