This commit is contained in:
tekhnofiend
2007-11-16 23:51:05 +00:00
parent 7fdb4a4a5c
commit 55bdbc67bc
3 changed files with 0 additions and 47 deletions
-27
View File
@@ -1,27 +0,0 @@
% test script
c3 = 9;
c4 = 13;
mybasis = create_bspline_basis([-.63 -.13], 30, 4);
% y is num samples (500) by num epochs (318)
argvals = -.63:1/256:-.13;
lsize = size(left_epochs_data,3);
epochs_data = zeros(size(left_epochs_data) + [0 0 size(right_epochs_data, 3)]);
for i=1:lsize
epochs_data(:,:,i) = left_epochs_data(:,:,i);
end
for i=1:size(right_epochs_data,3)
epochs_data(:,:,i + lsize) = right_epochs_data(:,:,i);
end
myfd_train = data2fd(squeeze(epochs_data(13,:,:)), argvals, mybasis);
pca_results = pca_fd(myfd_train, 30);
@@ -1,4 +0,0 @@
% test_opt() - play around with some optimization
function y = test_opt_scalar(a, x);
y = (x - a)^2;
-16
View File
@@ -1,16 +0,0 @@
t = linspace(0,1,30);
x = sin(t);
y = cos(t);
spline1 = spline(t, sin(t));
spline2 = spline(t, cos(t));
t1 = clock;
for i=1:1000
quadl(@myfunk, 0, 1, [], [], spline1, spline2);
end
t2 = clock;
t2 - t1