[R] R demos

[Jim Brennan]

Thanks!
 I realized the datasets were not available, but not that they were in a
separate package. I have never had to load this package in previous versions
and assumed they were part of one of the default main packages.
 
An easy fix was to adjust my default packages in the Rprofile file to
include "datasets"
This is for those who don't know a file in the etc directory.

options(defaultPackages=c("utils"  ,"datasets",  "graphics" ,"stats",
"methods", "MASS", "gtools"))

Not sure how this happened as I never had to do this before.

-----Original Message-----
From: Douglas Bates [mailto:dmbates at gmail.com] 
Sent: June 24, 2005 11:25 AM
To: Jim Brennan
Cc: r-help
Subject: Re: [R] R demos

On 6/24/05, Jim Brennan <jfbrennan at rogers.com> wrote:
> 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

For some reason you do not have the datasets package attached.

> find(Indometh)
[1] "package:datasets"
> find(volcano)
[1] "package:datasets"