그래프와 함께 하는 while
반복문은 여러 가지 흥미로운 예시에 활용할 수 있어요! 시간이 지나면서 부채가 줄어드는 모습을 시각화해 보면 어떨까요? 이전 연습 문제와 마찬가지로, 이번에도 한 번에 $500씩 상환하는 과정을 반복문으로 모델링합니다. 다만 매 반복마다 남은 부채 합계를 그래프에 추가해서, 진행하면서 총액이 어떻게 줄어드는지 볼 수 있게 해요.
이 연습 문제의 코드는 이미 완성되어 있습니다. 여기서 무슨 일이 일어나는지 함께 살펴보죠.
먼저, 몇 가지 변수를 초기화합니다:
debt= 현재 부채i= 부채가 줄어들 때마다 증가하는 값. x축의 다음 지점이에요.x_axis=i들의 벡터. 그래프의 x축이에요.y_axis=debt의 벡터. 그래프의 y축이에요.- 그리고 첫 번째 그래프를 만듭니다. 현재 부채를 나타내는 단일 점이에요.
다음으로 while 루프를 만듭니다. 아직 부채가 남아 있는 동안에는:
debt를 500만큼 줄입니다.i를 증가시킵니다.x_axis에 점을 하나 더 추가합니다.y_axis에 다음 부채 값을 추가합니다.- 업데이트된 데이터로 다음 그래프를 그립니다.
코드를 실행한 후에는 Previous Plot을 사용해 생성된 11개의 그래프를 모두 거슬러 올라가며 확인하실 수 있어요!
이 연습은 강의의 일부입니다
금융을 위한 R 중급
연습 안내
- 탐색을 마치셨다면 답변 제출만 누르시면 됩니다!
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
debt <- 5000 # initial debt
i <- 0 # x axis counter
x_axis <- i # x axis
y_axis <- debt # y axis
# Initial plot
plot(x_axis, y_axis, xlim = c(0,10), ylim = c(0,5000))
# Graph your debt
while (debt > 0) {
# Updating variables
debt <- debt - 500
i <- i + 1
x_axis <- c(x_axis, i)
y_axis <- c(y_axis, debt)
# Next plot
plot(x_axis, y_axis, xlim = c(0,10), ylim = c(0,5000))
}