## Not run:
# proto.file <- system.file( "proto", "addressbook.proto", package = "RProtoBuf" )
# Person <- P( "tutorial.Person", file = proto.file )
# ## End(Not run)
type(Person$id)
type(Person$id, as.string=TRUE)
cpp_type(Person$email)
cpp_type(Person$email, TRUE)
Run the code above in your browser using DataLab