R experts:

I want to prepare a demo (that will play sequentially in clicks) for a
presentation tutorial...Can somebody help me how can I write a demo, suppose
the following are steps in the demo..

#start
set.seed(1345)
x1 <- sample(letters[1:10], 5)
x1
sort(x1)
x <- sample(1:10, 5)
 y <- sample(c(11:20), 5)
require(lattice)
plot(x,y)
z <- rnorm(5, 1, 0.5)
dataframe <- data.frame(x, y, z)
model1 <- lm(y ~x)
aov(model1)
#end
Please help me, I could not get proper function / package to it.

	[[alternative HTML version deleted]]

