# Not run
## Load two-parameters sample data included in package
#data_file_path = paste(installed.packages()["spade","LibPath"],"spade","extdata","SimulatedRawData.fcs",sep=.Platform$file.sep)
## Run basic SPADE analyses, clustering on two parameters.
#output_dir <- tempdir()
#SPADE.driver(data_file_path, out_dir=output_dir, cluster_cols=c("marker1","marker2"))
## Read and write minimum spanning tree graph
#mst_graph <- igraph:::read.graph(paste(output_dir,"mst.gml",sep=.Platform$file.sep),format="gml")
#SPADE.write.graph(mst_graph, file = paste(output_dir,"new_mst.gml",sep=.Platform$file.sep), format = c("gml"))
Run the code above in your browser using DataLab