Displaying 1 result from an estimated 1 matches for "prininside".
2004 Nov 25
1
eval in correct frame?
I am trying, without success, to find out how to formulate correctly the
parameters of "eval".
My code snippet looks like:
proutside <- function(txt) {
cat("\n",txt,"\n");
print(eval(parse(text = txt)))
}
vari <- function(Ob) {
prininside <- function(txt) {
cat("\n",txt,"\n");
print(eval(parse(text = txt)))
}
prininside("'inside'; 2*Ob")
proutside("'outside'; 2*Ob")
}
Obs <- matrix(rnorm(9),nrow=3,ncol=3)
> vari(Obs)
'inside'; 2*Ob...