readf.m

Modeling and Forecasting Electricity Loads and Prices: A Statistical Approach" by Rafa&#322 Weron, p

function [files,folders]=readf;
%READF Read files and folders from the current directory.
%	[FILES,FOLDERS]=READF returns vectors of data (*.txt, *.dat) FILES and 
%   FOLDERS in the current directory.

%   Written by Adam Misiorek and Rafal Weron (2006.09.22)
%   Copyright (c) 2006 by Rafal Weron

files=dir;
nfiles=length(files);
[faf{1:nfiles}]=deal(files.name);
[folders{1:nfiles}]=deal(files.isdir);
faf=sort(upper({faf{[folders{:}]}}));

files=dir('*.txt');
files=[files;dir('*.dat')];
nfiles=length(files);
if nfiles
    [filesn{1:nfiles}]=deal(files.name);
    filesn=sort(lower(filesn));
    files={faf{:} filesn{:}};
else
    files=faf;
end;

folders=1:sum([folders{:}]);