powered by
message <- new( tutorial.Person, name = "dddd", email = "eeeeeee", id = 1 ) bytesize( message ) stopifnot( identical( bytesize(message), length(serialize(message, NULL ) ) ) )
Run the code above in your browser using DataLab