> Michael writes: > I can use data() to find the available datasets in a package, but I'd > like to extract and display some additional > information for each dataset than what is provided by data(), e.g., > class() and dim() for datasets for which > these are available. > ... > for all datasets in Item, giving a display like > > Item class dim Title > Abortion table 2x2x2 Abortion Opinion Data > Mental data.frame 24x2 Mental impariment and parents SES
This seems to work on your example: require('vcdExtra') ds <- as.data.frame(data(package="vcdExtra")$results[,c('Item','Title')], stringsAsFactors=FALSE) ds$dim <- lapply(ds$Item, function(x) { paste(dim(get(x)), collapse='x') } ) ds$class <- lapply(ds$Item, function(x) { class(get(x)) } ) ds <- ds[c('Item','class','dim','Title')] Thanks for the fun exercise. I've just started looking at the various 'apply-oid' functions, having spent much of my time with aggregate() and perhaps having my imagination stunted. cur -- Curt Seeliger, Data Ranger Raytheon Information Services - Contractor to ORD seeliger.c...@epa.gov 541/754-4638 [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.