While cu un grafic
Buclele pot fi folosite în tot felul de exemple interesante! Cum ar fi să vizualizezi cum scade datoria ta în timp? Ca în exercițiul anterior, acesta folosește o buclă pentru a modela rambursarea datoriei, câte 500 $ o dată. De data aceasta însă, la fiecare iterație vei adăuga și totalul datoriei rămase la un grafic, astfel încât să poți vizualiza cum scade pe parcurs.
Acest exercițiu a fost deja rezolvat pentru tine. Hai să vedem ce se întâmplă.
Mai întâi, se inițializează câteva variabile:
debt= Datoria ta curentăi= Incrementat de fiecare dată când datoria scade. Următorul punct de pe axa x.x_axis= Un vector de valorii. Axa x a graficelor.y_axis= Un vector de valoridebt. Axa y a graficelor.- De asemenea, se creează primul grafic – un singur punct reprezentând datoria curentă.
Apoi, se creează o buclă while. Cât timp mai există datorie:
debteste redusă cu 500.ieste incrementat.x_axiseste extins cu încă un punct.y_axiseste extins cu următoarea valoare a datoriei.- Următorul grafic este creat pe baza datelor actualizate.
După ce rulezi codul, poți folosi Previous Plot pentru a te întoarce și a vizualiza toate cele 11 grafice create!
Acest exercițiu face parte din cursul
R intermediar pentru finanțe
Instrucțiuni pentru exercițiu
- Apasă Trimite răspunsul după ce termini de explorat!
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
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))
}