library(data.tree)

library(treemap)
data(GNI2014)
head(GNI2014)

typeof(GNI2014)

GNI2014$pathString <- paste("world", 
                            GNI2014$continent, 
                            GNI2014$country, 
                            sep = "/")

print(as.Node(GNI2014,pathName = "pathString"), "iso3", "population", "GNI", limit = 20)
x=read.csv('test.csv')
class(x)
typeof(x)

print(x)
tree=as.Node(x,pathName = "pathString",colLevels="Name")
tree$Get('Name')
print(tree,"Amount")