Sửa đổi dấu chấm (...) bên trong một hàm

Question

Tôi đang cố sửa đổi các dấu chấm (...) bên trong một hàm tùy chỉnh. Dưới đây là ví dụ đơn giản về hàm plot2 của tôi, hiển thị âm mưu trên màn hình với type="p" (mặc định) và tiết kiệm một svg với type="l". Vấn đề hiển thị khi một trong các tùy chọn lô đất ... đã có trong chức năng. Trong ví dụ này, "type" được đối sánh bởi nhiều đối số thực tế.

plot2 <-function(...){ 
plot(...) #visible on screen 

svg("c:/temp/out.svg") #saved to file 
plot(...,type="l") 
dev.off() 
} 

#This works 
plot2(1:10) 
#This does not work because type is redefined 
plot2(1:10, type="o") 

Tôi đã cố gắng để đưa các dấu chấm trong một list bên trong hàm và sửa đổi nó, nhưng plot không chấp nhận một danh sách như một đầu vào.

#Does not work 
plot2 <-function(...){ 
plot(...) 

dots <<-list(...) 
print(dots) 
if("type" %in% names(dots)) dots$type="l" 
print(dots) 

svg("c:/temp/out.svg") 
plot(dots) 
dev.off() 
} 
plot2(1:10, type="o") 
Error in xy.coords(x, y, xlabel, ylabel, log) : 
    'x' is a list, but does not have components 'x' and 'y' 

Answer 1

Trong trường hợp bạn muốn chuyển tiếp một phiên bản sửa đổi của ..., bạn cần phải làm hai việc:

1. Capture các dấu chấm
2. Forward các dấu chấm chụp qua do.call.

này hoạt động như sau:

plot2 = function (...) { 
    # capture: 
    dots = list(...) 

    # modify: 
    dots$type = 'l' 

    # forward call: 
    do.call(plot, dots) 
} 

Nói chung, do.call(f, list(‹…›)) tương đương với f(‹…›).

Answer 2

Đối với những gì bạn muốn, có một cách đơn giản (và tốt hơn) và bạn không cần phải chạm vào .... Bằng cách xác định rõ ràng các đối số cần điều trị đặc biệt, bạn lấy chúng ra khỏi phần bắt tất cả .... Đây cũng là một cách tiếp cận lành mạnh rõ ràng hơn về chức năng của nó (trong các đối số chính thức của nó). Dưới đây là cách thực hiện:

plot2 <- function(x, type = "p", ...) { 
    plot(x, type = type, ...) #visible on screen 

    svg("out.svg") #saved to file 
    plot(x, ..., type = "l") 
    dev.off() 
} 

plot2(1:10) 
plot2(1:10, type = "o")