## Define a NG_data object
ng.iris <- ng_data(name = "IrisData", data = iris[,1:4])
## start a navGraph session
nav <- navGraph(ng.iris)
## set point sizes
ng_set_size(nav,'IrisData') <- sample(1:7, replace=TRUE, 150)
Run the code above in your browser using DataLab