## Not run:
# df = data.frame(x = c("T", "%T", "10341"),
# y = c("F", "f%t", "431"),
# z = c("T", "TRUE", "FALSE"))
# tmpf = tempfile()
# write.table(df, file = tmpf, quote = FALSE,
# row.names = FALSE, col.names = FALSE)
# df1 = readLiteral(file = tmpf)
# all(df1 == df)
# ## End(Not run)
Run the code above in your browser using DataLab