R语言 if/else/else if语句

对于试图根据条件返回输出的情况，if-else语句是一个很好的工具。在R中，语法为：

if (condition) {
    # 表达1 
} else {
    # 表达2
}

我们要检查存储为“quantity”的变量是否大于20。如果数量大于20，代码会打印“You sold a lot!”否则就是“ Not enough for today ” 。

# 创建向量quantity
quantity <-  25
# 设置if-else语句
if (quantity > 20) {
    print('You sold a lot!')
} else {
    print('Not enough for today')  
}
# 结果：
[1] "You sold a lot!"

else if语句

我们可以使用else if语句进一步定制控制级别。使用else if，您可以添加任意多个条件，语法是:

if (condition1) { 
    # 表达式1
    } else if (condition2) {
    # 表达式2
    } else if  (condition3) {
    # 表达式3
    } else {
    # 表达式4
}

例1：

我们想知道我们的销售量是否在20至30之间。如果在20~30之间，则输出“ Good ”；如果小于20，则输出“Not Good”，而如果>30，则输出“Excellent!”：

quantity <-  10

if (quantity <20) {
      print('Not Good')
} else if (quantity > 20  &quantity <= 30) {
     print('Good')
} else {
      print('Excellent!')
}

结果：

[1] "Not Good"

例2：

假设购买不同的产品有不同的增值税税率。假设我们有三种不同的产品，具有不同的增值税:

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)  
}

结果：

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