IF, ELSE, ELSE IF avaldus R-s

Lang L: none (table-of-contents):

Anonim

Kui muidu avaldus

If-else lause on suurepärane tööriist arendajale, kes üritab väljundit tingimuse alusel tagastada. R-is on süntaks järgmine:

if (condition) {Expr1} else {Expr2}

Tahame uurida, kas muutujana, mis on salvestatud kui "kogus", on üle 20. Kui kogus on suurem kui 20, trükitakse koodiga "Sa müüsid palju!" muidu pole tänaseks piisavalt.

# Create vector quantityquantity <- 25# Set the is-else statementif (quantity > 20) {print('You sold a lot!')} else {print('Not enough for today')}

Väljund:

## [1] "You sold a lot!"

Märkus . Veenduge, et taanded oleksid õigesti kirjutatud. Mitme tingimusega kood võib muutuda loetamatuks, kui taanded pole õiges asendis.

Muu kui avaldus

Saame juhtimistasandit muu if-lausega veelgi kohandada. Elifiga saate lisada nii palju tingimusi kui soovime. Süntaks on:

if (condition1) {expr1} else if (condition2) {expr2} else if (condition3) {expr3} else {expr4}

Oleme huvitatud sellest, kas müüsime koguseid vahemikus 20 kuni 30. Kui me seda müüme, siis pinti keskmine päev. Kui kogus on> 30, trükime milline tore päev !, muidu pole tänaseks piisavalt.

Võite proovida muuta koguse kogust.

# 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äljund:

## [1] "Not enough for today"

Näide 2:

Käibemaks on vastavalt ostetud tootele erinev määr. Kujutage ette, et meil on kolm erinevat liiki tooteid, millel on erinev käibemaks:

Kategooriad Tooted Käibemaks
A Raamat, ajakiri, ajaleht jne 8%
B Köögiviljad, liha, joogid jne. 10%
C Tee-särk, teksapüksid, püksid jne. 20%

Saame kirjutada keti, et rakendada kliendi ostetud tootele õiget käibemaksumäära.

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äljund:

# A vat rate of 8% is applied. The total price is 10.8