Rev 19 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed
library(foreign)lookup.xport("Alfalfa.xpt")Alfalfa <- read.xport("Alfalfa.xpt", stringsAsFactors = TRUE)summary(Alfalfa)## test data provided by FRohde@birchdavis.comlookup.xport("test.xpt")testdata <- read.xport("test.xpt")summary(testdata)q()