sep=",", nbytes=4, endian=.Platform$endian)
{
# data_ascii can be of two types: [big.]matrix, or connection
if (is.character(data_ascii))
sep=",", nbytes=4, endian=.Platform$endian)
{
# data_ascii can be of two types: [big.]matrix, or connection
if (is.character(data_ascii))