Untitled

system("/usr/local/hadoop/bin/hdfs dfs -rm -r /appoLuca/out")
hdfs.init()
hdfs.root <- '/appoLuca'
hdfs.data <- file.path(hdfs.root, 'ordini.csv')
hdfs.out <- file.path(hdfs.root, 'out')
results <- from.dfs(job1(hdfs.data, hdfs.out))
print("printing output...\n")
results.df <- as.data.frame(results, stringsAsFactors=F)

colnames(results.df)
print(results.df)