Câu lệnh IF, ELSE, ELSE IF trong R

Câu lệnh if else

Câu lệnh if-else là một công cụ tuyệt vời dành cho nhà phát triển đang cố gắng trả về kết quả đầu ra dựa trên một điều kiện. Trong R, cú pháp là:

if (condition) {
    Expr1 
} else {
    Expr2
}

Tuyên bố nếu khác

Chúng tôi muốn kiểm tra xem biến được lưu trữ dưới dạng “số lượng” có lớn hơn 20 hay không. Nếu số lượng lớn hơn 20, mã sẽ in ra “Bạn đã bán được nhiều!” nếu không thì không đủ cho hôm nay.

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

Đầu ra:

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

Chú thích: Hãy chắc chắn rằng bạn viết chính xác các vết lõm. Mã có nhiều điều kiện có thể không đọc được khi thụt lề không đúng vị trí.

Câu lệnh else if

Chúng ta có thể tùy chỉnh thêm mức độ kiểm soát bằng câu lệnh else if. Với Elif, bạn có thể thêm bao nhiêu điều kiện tùy thích. Cú pháp là:

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

Chúng tôi muốn biết liệu chúng tôi có bán được số lượng từ 20 đến 30 không. Nếu có, thì pint Trung bình một ngày. Nếu số lượng > 30, chúng tôi sẽ in Thật là một ngày tuyệt vời!, nếu không thì Không đủ cho ngày hôm nay.

Bạn có thể thử thay đổi số lượng.

# 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!')
}

Đầu ra:

## [1] "Not enough for today"

Ví dụ 2:

VAT có mức thuế suất khác nhau tùy theo sản phẩm mua. Hãy tưởng tượng chúng ta có ba loại sản phẩm khác nhau được áp dụng VAT khác nhau:

Danh Mục SẢN PHẨM Thuế GTGT
A Sách, tạp chí, báo, v.v.. 8%
B Rau, thịt, nước giải khát, vv. 10%
C Áo phông, quần jean, quần, v.v. 20%

Chúng ta có thể viết một chuỗi để áp dụng thuế suất VAT chính xác cho sản phẩm mà khách hàng đã mua.

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

Đầu ra:

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