R script for spacegroup analysis added and updated