long *NUMstring_getElementsOfRanges (const char32 *ranges, long maximumElement, long *numberOfElements, long *numberOfMultiples, const char32 *elementType, bool sortedUniques) {
autoNUMvector<long> elements (getElementsOfRanges (ranges, maximumElement, numberOfElements, elementType), 1);
if (sortedUniques) {
NUMlvector_getUniqueNumbers (elements.peek(), numberOfElements, numberOfMultiples);
}
return elements.transfer();
}
TableOfReal TableOfReal_extractColumnRanges (TableOfReal me, const wchar_t *ranges) {
try {
long numberOfElements;
autoNUMvector <long> elements (getElementsOfRanges (ranges, my numberOfColumns, & numberOfElements, L"column"), 1);
autoTableOfReal thee = TableOfReal_create (my numberOfRows, numberOfElements);
copyRowLabels (me, thee.peek());
for (long ielement = 1; ielement <= numberOfElements; ielement ++)
copyColumn (me, elements [ielement], thee.peek(), ielement);
return thee.transfer();
} catch (MelderError) {
Melder_throw (me, ": column ranges not extracted.");
}
}
