tests/test_as_is.R

In dpastoor/SASxport: Read and Write SAS XPORT Files

library(SASxport)
Sys.setenv("TZ"="GMT")

lookup.xport('puromycin.xpt')

## By default, character variable "STATE" should be converted into a
## factor
x <- read.xport('puromycin.xpt')
str(x)

stopifnot( class(x$STATE)=="factor" )

## When as.is=TRUE, character variable "STATE" should be preserved as
## a character variable.

x <- read.xport('puromycin.xpt',as.is=TRUE)
str(x)

stopifnot( class(x$STATE)=="character" )