Deutsches R-Forum

Hi, ich würde gerne einen Decorator schreiben der mir erlaubt die Argumente und deren Typ einer Funktion in die Console von RStudio zu printen. Bisher hab ich folgenden Ansatz, der aber nicht funktioniert:

print_arguments <- function(f){
function(...){
environment(print_arguments) <- environment(f)
arguments_of_f <- sapply(list(...), typeof)
print(arguments_of_f)
return(f(...))
}}

Die ausgabe von print_arguments(function(a=4,b=6){return(a+b)}) ist:

function(...){
environment(print_arguments) <- environment(f)
arguments_of_f <- sapply(list(...), typeof)
print(arguments_of_f)
return(f(...))
}
<bytecode: 0x9bfed88>
<environment: 0x4ea1398>

Weiß jemand wie ich an die Argumente der Funktion komme auf die ich den Decorator anwenden will?