ReadWTS: load .wts files
In aultsch/DataIO: IO Handling for Files Containing Data

Load ESOM weights from a *.wts file

1	ReadWTS(FileName, InDirectory=getwd())

`FileName`	name of the file
`InDirectory`	the directrory of the *.wts file is

WtsFileName may have a .wts extension, if not, it will be added automatically and only files with a .wts extension can be loaded

a list

`wts`	[1:Lines*Columns,1:weights] Information stored as a List of weights in a 2D matrix, Note: Make this a 3 dimensional array through ListAsEsomNeurons `ListAsEsomNeurons` Information represents a 2D grid with a weight for every neuron of the length of the data set (number of variables)
`rows`	number of ESOM rows from header in *.wts file
`columns`	number of ESOM columns from header in *.wts file
`Keys`	the Keys for the data dimensions, usually just ones