The following function, \Rfun{ProvideSampleId()}, strives to supply a unique sample ID from any path supplied to it. Of course, a certain structure on the part of the path and filename are assumed, namely:
\begin{itemize}
\item That the filename (not including the extension) consists of three alphanumeric strings separated by hyphens.
\item That\ldots
\end{itemize}