From 55bdbc67bcb25ebcb4dcc1e60fdf09e2a4b99887 Mon Sep 17 00:00:00 2001 From: tekhnofiend Date: Fri, 16 Nov 2007 23:51:05 +0000 Subject: [PATCH] nishant --- fastlib/u/niche/functional/test_mine.m | 27 -------------------- fastlib/u/niche/functional/test_opt_scalar.m | 4 --- fastlib/u/niche/functional/test_quadl.m | 16 ------------ 3 files changed, 47 deletions(-) delete mode 100644 fastlib/u/niche/functional/test_mine.m delete mode 100644 fastlib/u/niche/functional/test_opt_scalar.m delete mode 100644 fastlib/u/niche/functional/test_quadl.m diff --git a/fastlib/u/niche/functional/test_mine.m b/fastlib/u/niche/functional/test_mine.m deleted file mode 100644 index 2691f87b13..0000000000 --- a/fastlib/u/niche/functional/test_mine.m +++ /dev/null @@ -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); \ No newline at end of file diff --git a/fastlib/u/niche/functional/test_opt_scalar.m b/fastlib/u/niche/functional/test_opt_scalar.m deleted file mode 100644 index 073eefbbb3..0000000000 --- a/fastlib/u/niche/functional/test_opt_scalar.m +++ /dev/null @@ -1,4 +0,0 @@ -% test_opt() - play around with some optimization -function y = test_opt_scalar(a, x); - -y = (x - a)^2; diff --git a/fastlib/u/niche/functional/test_quadl.m b/fastlib/u/niche/functional/test_quadl.m deleted file mode 100644 index e7ec4c4c5f..0000000000 --- a/fastlib/u/niche/functional/test_quadl.m +++ /dev/null @@ -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 \ No newline at end of file