# NOT RUN {
#Visualize Euclidian distances of all samples using "SampleID" target data as labels.
plot_euclid_dist("SampleID", filename="euclidian_distance.pdf",
theme=2, returnData=FALSE)
#Visualize Euclidian distances of all samples using "timepoint" target data as labels.
#Store the resulting distance matrix data.
distMatrix <- plot_euclid_dist("timepoint", filename="euclidian_distance.pdf",
theme=2, returnData=TRUE)
# }
Run the code above in your browser using DataLab