myfun <- function(x, ...) {

    for(i in list(...)) {

        print(x * i)

    }

}

​

d <- function(...){

    x <- list(...) // THIS WILL BE A LIST STORING EVERYTHING:

    sum(...)

}

​

// OUTPUT EXAMPLES

> d(1,2,3,4,5)

[1] 15 

> myfun(4, 3, 1)

[1] 12

[1] 4

> myfun(4, 9, 1, 0, 12)

[1] 36

[1] 4

[1] 0

[1] 48

> myfun(4)