[R] R demos

Jim Brennan jfbrennan at rogers.com
Fri Jun 24 17:20:36 CEST 2005


I have noticed that some data sets seem not to be available to me when I am
running some of the examples or demos since I have changed versions. For
example:
demo(persp)


        demo(persp)
        ---- ~~~~~

Type  <Return>   to start : 

R>if (dev.cur() <= 1) get(getOption("device"))()

R>is.dev.interactive <- .Device %in% c("X11", "GTK", 
    "gnome", "quartz", "windows", "JavaGD")

R>op <- par(ask = is.dev.interactive)

R>x <- seq(-10, 10, length = 50)

R>y <- x

R>rotsinc <- function(x, y) {
    sinc <- function(x) {
        y <- sin(x)/x
        y[is.na(y)] <- 1
        y
    }
    10 * sinc(sqrt(x^2 + y^2))
}

R>sinc.exp <- expression(z == Sinc(sqrt(x^2 + y^2)))

R>z <- outer(x, y, rotsinc)

R>par(bg = "white")

R>persp(x, y, z, theta = 30, phi = 30, expand = 0.5, 
    col = "lightblue")
Waiting to confirm page change...

R>title(sub = ".")

R>title(main = sinc.exp)

R>persp(x, y, z, theta = 30, phi = 30, expand = 0.5, 
    col = "lightblue", ltheta = 120, shade = 0.75, ticktype = "detailed", 
    xlab = "X", ylab = "Y", zlab = "Z")
Waiting to confirm page change...

R>title(sub = ".")

R>title(main = sinc.exp)

R>z <- 2 * volcano
Error in eval.with.vis(expr, envir, enclos) : 
        Object "volcano" not found

So most of this demo works but volcano is not found.
Any ideas what may be going wrong.
Also for example
R>?reshape
R>summary(Indometh)
Error in summary(Indometh) : Object "Indometh" not found

version         _              
platform i386-pc-mingw32
arch     i386           
os       mingw32        
system   i386, mingw32  
status                  
major    2              
minor    1.0            
year     2005           
month    04             
day      18             
language R




More information about the R-help mailing list