# NOT RUN {
data(example1)
write.sym.table(example1, file='temp4.csv', sep='|',dec='.', row.names=TRUE, col.names=TRUE)
ex1 <- read.sym.table('temp4.csv', header=TRUE, sep='|',dec='.', row.names=1)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab