R chức năng; nếu đầu vào không được đưa ra, hãy yêu cầu nó

Question

Tôi đang cố gắng viết một hàm trong R có hai đầu vào là chuỗi. Nếu không có đầu vào nào được đặt, nó sẽ yêu cầu đầu vào và sau đó tiếp tục chức năng.

Input < - function(j,k){ 
    if ((j==j)&&(k==k)){ 
     j <- readline(prompt="Enter Input 1: ") 
     k <- readline(prompt="Enter Input 2: ") 
     Input(j,k) 
    }else if ((j=="<string here>")&&(k=="<string here>")){ 
     .... 
    } 
} 

Answer 1

Tôi nghĩ rằng cách tốt hơn để cấu trúc cách tiếp cận của bạn sẽ được này, sử dụng đối số tùy chọn và thử nghiệm để xem nếu họ không null trước khi tiếp tục, mặc dù phải thừa nhận là câu hỏi được đăng của bạn là rất mơ hồ:

Input < - function(j=NA, k=NA) { 
    if (is.na(j) | is.na(k)){ 
    j <- readline(prompt="Enter Input 1: ") 
    k <- readline(prompt="Enter Input 2: ") 
    Input(j, k) 
    } else if ((j == "<string here>") & (k == "<string here>")) { 
    .... 
    } 
} 

Answer 2

Mặc dù cá nhân tôi thích is.NA hoặc is.NULL (như trong @Forrest 's câu trả lời), đây là một sự thay thế với missing rằng có thể trông đơn giản hơn cho người bắt đầu ngay bây giờ với R.

Input <- function(j, k) { 
    if (missing(j) | missing(k)){ 
    j <- readline(prompt="Enter Input 1: ") 
    k <- readline(prompt="Enter Input 2: ") 
    Input(j, k) 
    } else if ((j == "<string here>") & (k == "<string here>")) { 
    .... 
    } 
} 

Answer 3

Tôi nghĩ rằng có lẽ đơn giản nhất là đặt mã readline làm đối số. Các force lệnh đánh giá lực lượng của mã đó tại điểm đó trong hàm. Tôi không nghĩ rằng chúng là cần thiết nhưng tùy thuộc vào chức năng khác, bạn có thể muốn đảm bảo rằng nó yêu cầu j và k trước thay vì sau này; nếu không mã sẽ được đánh giá khi nó đầu tiên cần biết những gì j và k là.

Input <- function(j = readline(prompt="Enter Input 1: "), 
        k = readline(prompt="Enter Input 2: ")) { 
    force(j) 
    force(k) 
    if ((j=="<string here>") && (k=="<string here>")) { 
     .... 
    } 
}