Kiểm tra xem một cuộc tranh cãi của một hàm được thiết lập hay không trong R

Question

Tôi có một chức năng f rằng có hai tham số (p1 và p2):

Nếu cho tham số p2 không có giá trị được truyền cho hàm, giá trị của p1^2 nên được sử dụng thay thế. Nhưng làm thế nào tôi có thể tìm ra trong hàm, nếu một giá trị được đưa ra hay không. Vấn đề là biến số p2 không được khởi tạo nếu không có giá trị. Vì vậy, tôi không thể kiểm tra cho p2 là NULL.

f <- function(p1, p2) { 
    if(is.null(p2)) { 
     p2=p1^2 
    } 
    p1-p2 
} 

Bằng cách nào đó bạn có thể kiểm tra xem giá trị cho p2 có được chuyển đến hàm hay không? (Tôi không thể tìm thấy isset() - chức năng hoặc những thứ tương tự.)

Answer 1

Bạn sử dụng chức năng missing() cho điều đó.

f <- function(p1, p2) { 
    if(missing(p2)) { 
     p2=p1^2 
    } 
    p1-p2 
} 

Hoặc, bạn có thể đặt giá trị của p2 thành NULL theo mặc định. Đôi khi tôi thích giải pháp đó, vì nó cho phép chuyển các đối số đến các hàm lồng nhau.

f <- function(p1, p2=NULL) { 
    if(is.null(p2)) { 
     p2=p1^2 
    } 
    p1-p2 
} 

f.wrapper <-function(p1,p2=NULL){ 
    p1 <- 2*p1 
    f(p1,p2) 
} 
> f.wrapper(1) 
[1] -2 
> f.wrapper(1,3) 
[1] -1 

EDIT: bạn có thể làm điều này về mặt kỹ thuật với missing() là tốt, nhưng sau đó bạn sẽ phải bao gồm một tuyên bố missing() trong f.wrapper là tốt.

Answer 2

Tôi nghĩ '? Thiếu' nên làm điều đó.

Answer 3

Trong một trường hợp như thế này, bạn cũng có thể sử dụng một cái gì đó như thế này:

f <- function(p1, p2 = p1^2) { 
    p1-p2 
} 

Xem phần trên đánh giá Lazy tại http://adv-r.had.co.nz/Functions.html