Or this;
remember <- function(expr, value, ok, visible) {
assign( ".Last.expr", expr, .GlobalEnv )
invisible( TRUE )
}
addTaskCallback(remember)
> x <- rnorm(
+ 10 )
> .Last.expr
x <- rnorm(10)
Romain
On 08/02/2009 01:11 PM, Gabor Grothendieck wrote:
Try this:
x<- 4
x*x+3
[1] 19
save
Try this:
> x <- 4
> x*x+3
[1] 19
> savehistory(".Rhistory")
> c(parse(text = tail(readLines(".Rhistory"), 2)[1]))
expression(x * x + 3)
On Sun, Aug 2, 2009 at 5:02 AM, Daniel Haase wrote:
> Hi,
>
> I am looking for a way to find out the last expression that was entered by
> the user, similar to
2 matches
Mail list logo
