unitest.proto.file <- system.file("unitTests", "data", "unittest.proto",
package = "RProtoBuf" )
readProtoFiles(file = unitest.proto.file)
test <- new(protobuf_unittest.TestAllTypes)
test$size("optional_int32")
test$add("repeated_int32", 1:10)
test$size("repeated_int32")Run the code above in your browser using DataLab