R'de IF, ELSE, ELSE IF ifadesi

if else ifadesi

If-else ifadesi, geliลŸtiricinin bir koลŸula dayalฤฑ olarak รงฤฑktฤฑ dรถndรผrmeye รงalฤฑลŸmasฤฑ iรงin harika bir araรงtฤฑr. R'de sรถzdizimi ลŸรถyledir:

if (condition) {
    Expr1 
} else {
    Expr2
}

Aksi takdirde Bildirimi

"Miktar" olarak saklanan bir deฤŸiลŸkenin 20'nin รผzerinde olup olmadฤฑฤŸฤฑnฤฑ incelemek istiyoruz. Miktar 20'den bรผyรผkse, kod "ร‡ok sattฤฑnฤฑz!" yazdฤฑracaktฤฑr, aksi takdirde Bugรผn iรงin yeterli deฤŸil.

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

ร‡ฤฑktฤฑ:

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

not: Girintileri doฤŸru yazdฤฑฤŸฤฑnฤฑzdan emin olun. Birden รงok koลŸul iรงeren kod, girintiler doฤŸru konumda olmadฤฑฤŸฤฑnda okunamaz hale gelebilir.

else if ifadesi

Kontrol seviyesini else if ifadesi ile daha da รถzelleลŸtirebiliriz. Elif ile istediฤŸimiz kadar koลŸul ekleyebilirsiniz. Sรถzdizimi ลŸรถyledir:

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

20 ile 30 arasฤฑnda miktarlar satฤฑp satmadฤฑฤŸฤฑmฤฑzฤฑ bilmek istiyoruz. EฤŸer satarsak, o zaman pint Ortalama gรผn. Miktar > 30 ise Ne harika bir gรผn!, aksi takdirde Bugรผn iรงin yeterli deฤŸil yazdฤฑrฤฑrฤฑz.

Miktar miktarฤฑnฤฑ deฤŸiลŸtirmeyi deneyebilirsiniz.

# Create vector quantiy
quantity <-  10
# Create multiple condition statement
if (quantity <20) {
      print('Not enough for today')
} else if (quantity > 20  &quantity <= 30) {
     print('Average day')
} else {
      print('What a great day!')
}

ร‡ฤฑktฤฑ:

## [1] "Not enough for today"

ร–rnek 2:

KDV, satฤฑn alฤฑnan รผrรผne gรถre farklฤฑ oranlara sahiptir. Farklฤฑ KDV uygulanan รผรง farklฤฑ tรผrde รผrรผnรผmรผz olduฤŸunu dรผลŸรผnรผn:

Kategoriler รœrรผnler KDV
A Kitap, dergi, gazete vb. 8%
B Sebze, et, iรงecek vb. 10%
C TiลŸรถrt, jean, pantolon vb. 20%

MรผลŸterinin aldฤฑฤŸฤฑ รผrรผne doฤŸru KDV oranฤฑnฤฑ uygulayabilmek iรงin zincir yazabiliriz.

category <- 'A'
price <- 10
if (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)  
}

ร‡ฤฑktฤฑ:

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

Bu yazฤฑyฤฑ ลŸu ลŸekilde รถzetleyin: