## Not run:
# Sys.setenv(ETSEED_USER = "root")
# Sys.setenv(ETSEED_PWD = "pickbetterpwd")
#
# # make a client
# cli <- etcd()
#
# # list members
# cli$member_list()
#
# # add a member
# # cli$member_add("http://10.0.0.10:2380")
#
# # change a member - not sure this is working...
# ## mms <- cli$member_list()
# ## cli$member_change(mms$members[[1]]$id, "http://10.0.0.10:8380", config=verbose())
#
# # delete a member
# # mms <- cli$member_list()
# # cli$member_delete(mms$members[[1]]$id)
# ## End(Not run)
Run the code above in your browser using DataLab