if (FALSE) {
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)
}
Run the code above in your browser using DataLab