Príkaz if else
Príkaz if-else je vynikajúci nástroj pre vývojárov, ktorí sa snažia vrátiť výstup na základe podmienky. V jazyku R je syntax:
if (condition) {Expr1} else {Expr2}
Chceme preskúmať, či je premenná uložená ako „množstvo“ nad 20. Ak je množstvo väčšie ako 20, kód vytlačí „Predali ste veľa!“ inak pre dnešok málo.
# Create vector quantityquantity <- 25# Set the is-else statementif (quantity > 20) {print('You sold a lot!')} else {print('Not enough for today')}
Výkon:
## [1] "You sold a lot!"
Poznámka : Uistite sa, že ste správne napísali odsadenie. Kód s viacerými podmienkami sa môže stať nečitateľný, ak odsadenia nie sú na správnom mieste.
Výrok else if
Úroveň ovládania môžeme ďalej prispôsobiť príkazom else if. Pomocou elif môžete pridať toľko podmienok, koľko chceme. Syntax je:
if (condition1) {expr1} else if (condition2) {expr2} else if (condition3) {expr3} else {expr4}
Zaujíma nás, či sme predali množstvá medzi 20 a 30. Ak tak urobíme, potom pinta Priemerný deň. Ak je množstvo> 30, vytlačíme Aký skvelý deň !, inak pre dnešok nestačí.
Môžete skúsiť zmeniť množstvo.
# Create vector quantiyquantity <- 10# Create multiple condition statementif (quantity <20) {print('Not enough for today')} else if (quantity > 20 &quantity <= 30) {print('Average day')} else {print('What a great day!')}
Výkon:
## [1] "Not enough for today"
Príklad 2:
DPH sa líši podľa zakúpeného produktu. Predstavte si, že máme tri rôzne druhy výrobkov s rozdielnou DPH:
| Kategórie | Produkty | DPH |
|---|---|---|
| A | Kniha, časopis, noviny atď. | 8% |
| B | Zelenina, mäso, nápoje atď. | 10% |
| C. | Tričko, jean, nohavice atď ... | 20% |
Môžeme napísať reťazec, pomocou ktorého použijeme správnu sadzbu DPH na produkt, ktorý si zákazník kúpil.
category <- 'A'price <- 10if (category =='A'){cat('A vat rate of 8% is applied.','The total price is',price *1.08)} else if (category =='B'){cat('A vat rate of 10% is applied.','The total price is',price *1.10)} else {cat('A vat rate of 20% is applied.','The total price is',price *1.20)}
Výkon:
# A vat rate of 8% is applied. The total price is 10.8