You can subscribe to this list here.
2001 
_{Jan}

_{Feb}

_{Mar}

_{Apr}

_{May}

_{Jun}

_{Jul}
(10) 
_{Aug}
(5) 
_{Sep}
(3) 
_{Oct}
(41) 
_{Nov}
(41) 
_{Dec}
(33) 

2002 
_{Jan}
(75) 
_{Feb}
(10) 
_{Mar}
(170) 
_{Apr}
(174) 
_{May}
(66) 
_{Jun}
(11) 
_{Jul}
(10) 
_{Aug}
(44) 
_{Sep}
(73) 
_{Oct}
(28) 
_{Nov}
(139) 
_{Dec}
(52) 
2003 
_{Jan}
(35) 
_{Feb}
(93) 
_{Mar}
(62) 
_{Apr}
(10) 
_{May}
(55) 
_{Jun}
(70) 
_{Jul}
(37) 
_{Aug}
(16) 
_{Sep}
(56) 
_{Oct}
(31) 
_{Nov}
(57) 
_{Dec}
(83) 
2004 
_{Jan}
(85) 
_{Feb}
(67) 
_{Mar}
(27) 
_{Apr}
(37) 
_{May}
(75) 
_{Jun}
(85) 
_{Jul}
(160) 
_{Aug}
(68) 
_{Sep}
(104) 
_{Oct}
(25) 
_{Nov}
(39) 
_{Dec}
(23) 
2005 
_{Jan}
(10) 
_{Feb}
(45) 
_{Mar}
(43) 
_{Apr}
(19) 
_{May}
(108) 
_{Jun}
(31) 
_{Jul}
(41) 
_{Aug}
(23) 
_{Sep}
(65) 
_{Oct}
(58) 
_{Nov}
(44) 
_{Dec}
(54) 
2006 
_{Jan}
(96) 
_{Feb}
(27) 
_{Mar}
(69) 
_{Apr}
(59) 
_{May}
(67) 
_{Jun}
(35) 
_{Jul}
(13) 
_{Aug}
(461) 
_{Sep}
(160) 
_{Oct}
(399) 
_{Nov}
(32) 
_{Dec}
(72) 
2007 
_{Jan}
(316) 
_{Feb}
(305) 
_{Mar}
(318) 
_{Apr}
(54) 
_{May}
(194) 
_{Jun}
(173) 
_{Jul}
(282) 
_{Aug}
(91) 
_{Sep}
(227) 
_{Oct}
(365) 
_{Nov}
(168) 
_{Dec}
(18) 
2008 
_{Jan}
(71) 
_{Feb}
(111) 
_{Mar}
(155) 
_{Apr}
(173) 
_{May}
(70) 
_{Jun}
(67) 
_{Jul}
(55) 
_{Aug}
(83) 
_{Sep}
(32) 
_{Oct}
(68) 
_{Nov}
(80) 
_{Dec}
(29) 
2009 
_{Jan}
(46) 
_{Feb}
(18) 
_{Mar}
(95) 
_{Apr}
(76) 
_{May}
(140) 
_{Jun}
(98) 
_{Jul}
(84) 
_{Aug}
(123) 
_{Sep}
(94) 
_{Oct}
(131) 
_{Nov}
(142) 
_{Dec}
(125) 
2010 
_{Jan}
(128) 
_{Feb}
(158) 
_{Mar}
(172) 
_{Apr}
(134) 
_{May}
(94) 
_{Jun}
(84) 
_{Jul}
(32) 
_{Aug}
(127) 
_{Sep}
(167) 
_{Oct}
(109) 
_{Nov}
(69) 
_{Dec}
(78) 
2011 
_{Jan}
(39) 
_{Feb}
(58) 
_{Mar}
(52) 
_{Apr}
(47) 
_{May}
(56) 
_{Jun}
(76) 
_{Jul}
(55) 
_{Aug}
(54) 
_{Sep}
(165) 
_{Oct}
(255) 
_{Nov}
(328) 
_{Dec}
(263) 
2012 
_{Jan}
(82) 
_{Feb}
(147) 
_{Mar}
(400) 
_{Apr}
(216) 
_{May}
(209) 
_{Jun}
(160) 
_{Jul}
(86) 
_{Aug}
(141) 
_{Sep}
(156) 
_{Oct}
(6) 
_{Nov}

_{Dec}

2015 
_{Jan}

_{Feb}

_{Mar}

_{Apr}

_{May}

_{Jun}

_{Jul}
(1) 
_{Aug}

_{Sep}
(1) 
_{Oct}

_{Nov}
(1) 
_{Dec}
(2) 
2016 
_{Jan}

_{Feb}
(2) 
_{Mar}
(2) 
_{Apr}
(1) 
_{May}
(1) 
_{Jun}
(2) 
_{Jul}
(1) 
_{Aug}
(1) 
_{Sep}

_{Oct}

_{Nov}

_{Dec}

S  M  T  W  T  F  S 



1
(12) 
2
(1) 
3
(4) 
4
(4) 
5
(4) 
6
(5) 
7
(5) 
8
(9) 
9
(9) 
10
(11) 
11
(11) 
12
(14) 
13

14
(10) 
15
(8) 
16
(5) 
17
(1) 
18
(10) 
19
(2) 
20
(5) 
21
(14) 
22
(15) 
23
(9) 
24
(12) 
25
(2) 
26
(1) 
27
(5) 
28
(3) 
29
(3) 
30
(10) 
31
(5) 


From: <benjf5@us...>  20120526 01:07:14

Revision: 10523 http://octave.svn.sourceforge.net/octave/?rev=10523&view=rev Author: benjf5 Date: 20120526 01:07:07 +0000 (Sat, 26 May 2012) Log Message:  Written complex function, updated others for lssa. Modified Paths:  trunk/octaveforge/extra/lssa/lscorrcoeff.m trunk/octaveforge/extra/lssa/lsreal.m trunk/octaveforge/extra/lssa/lswaveletcoeff.m Added Paths:  trunk/octaveforge/extra/lssa/lscomplex.m Added: trunk/octaveforge/extra/lssa/lscomplex.m ===================================================================  trunk/octaveforge/extra/lssa/lscomplex.m (rev 0) +++ trunk/octaveforge/extra/lssa/lscomplex.m 20120526 01:07:07 UTC (rev 10523) @@ 0,0 +1,39 @@ +## Copyright (C) 2012 Benjamin Lewis <benjf5@...> +## +## This program is free software; you can redistribute it and/or modify it under +## the terms of the GNU General Public License as published by the Free Software +## Foundation; either version 2 of the License, or (at your option) any later +## version. +## +## This program is distributed in the hope that it will be useful, but WITHOUT +## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or +## FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more +## details. +## +## You should have received a copy of the GNU General Public License along with +## this program; if not, see <http://www.gnu.org/licenses/>;. + +## * texinfo * +## @deftypefn {Function File} {t =} lscomplex ( time, mag, maxfreq, numcoeff, numoctaves) +## +## Return the complex leastsquares transform of the (@var{time},@var{mag}) +## series, considering frequencies up to @var{maxfreq}, over @var{numoctaves} +## octaves and @var{numcoeff} coefficients. +## +## @end deftypefn + + +function transform = lscomplex( t , x , omegamax , ncoeff , noctave ) + n = length(t); ## VECTOR ONLY, and since t and x have the same number of entries, there's no problem. + n1 = 1 / n; + transform = zeros(1,ncoeff*noctave); + o = omegamax; + omul = 2 ^ (  1 / ncoeff ); + for iter = 1:ncoeff*noctave + ot = o .* t; + transform(iter) = sum( ( cos(ot) . ( sin(ot) .* i ) ) .* x ); ## See the paper for the expression + o *= omul; ## To advance the transform to the next coefficient in the octave + endfor + transform .* n1; + +endfunction \ No newline at end of file Modified: trunk/octaveforge/extra/lssa/lscorrcoeff.m ===================================================================  trunk/octaveforge/extra/lssa/lscorrcoeff.m 20120525 23:14:13 UTC (rev 10522) +++ trunk/octaveforge/extra/lssa/lscorrcoeff.m 20120526 01:07:07 UTC (rev 10523) @@ 14,9 +14,9 @@ ## this program; if not, see <http://www.gnu.org/licenses/>;. ## * texinfo * ## @deftypefn {Function File} {c =} nucorrcoeff (abc1, ord1, abc2, ord2, time, freq) ## @deftypefnx {Function File} {c =} nucorrcoeff (abc1, ord1, abc2, ord2, time, freq, window) ## @deftypefnx {Function File} {c =} nucorrcoeff (abc1, ord1, abc2, ord2, time, freq, window, winradius) +## @deftypefn {Function File} {c =} lscorrcoeff (abc1, ord1, abc2, ord2, time, freq) +## @deftypefnx {Function File} {c =} lscorrcoeff (abc1, ord1, abc2, ord2, time, freq, window) +## @deftypefnx {Function File} {c =} lscorrcoeff (abc1, ord1, abc2, ord2, time, freq, window, winradius) ## ## Return the coefficient of the wavelet correlation of time ## series (@var{abc1}, @var{ord1}) and (@var{abc2}, @var{ord2}). @@ 31,13 +31,13 @@ %! x = 1:10; %! y = sin(x); %! z = cos(x); %! a = nucorrcoeff(x,y,x,z,0.5,0.9) +%! a = lscorrcoeff(x,y,x,z,0.5,0.9) %! ## This generates the correlation coefficient at time 0.5 and circular freq. 0.9 ## nucorrcoeff, computes a coefficient of the wavelet correlation of two time series function coeff = nucorrcoeff(x1, y1, x2, y2, t, o, wgt = @cubicwgt, wgtrad = 1) +function coeff = lscorrcoeff(x1, y1, x2, y2, t, o, wgt = @cubicwgt, wgtrad = 1) so = 0.05 * o; ## This code can only, as of currently, work on vectors; I haven't figured out a way to make it work on a matrix. if( ( ndims(x1) == 2 ) && ! ( rows(x1) == 1 ) ) Modified: trunk/octaveforge/extra/lssa/lsreal.m ===================================================================  trunk/octaveforge/extra/lssa/lsreal.m 20120525 23:14:13 UTC (rev 10522) +++ trunk/octaveforge/extra/lssa/lsreal.m 20120526 01:07:07 UTC (rev 10523) @@ 23,7 +23,7 @@ ## ## @end deftypefn function transform = nureal( t, x, omegamax, ncoeff, noctave) +function transform = lsreal( t, x, omegamax, ncoeff, noctave) ## the R function runs the following command: ## nureal( double X, double Y, int min(X,Y), int ncoeff, int noctave, double omegamax, complex rp) ## this means that in the C, *tptr is X and *xptr is Y. Yes, I know. I think I'll rename them. Modified: trunk/octaveforge/extra/lssa/lswaveletcoeff.m ===================================================================  trunk/octaveforge/extra/lssa/lswaveletcoeff.m 20120525 23:14:13 UTC (rev 10522) +++ trunk/octaveforge/extra/lssa/lswaveletcoeff.m 20120526 01:07:07 UTC (rev 10523) @@ 14,9 +14,9 @@ ## this program; if not, see <http://www.gnu.org/licenses/>;. ## * texinfo * ## @deftypefn {Function File} {c =} nuwaveletcoeff (abc, ord, time, freq) ## @deftypefnx {Function File} {c =} nuwaveletcoeff (abc, ord, time, freq, window) ## @deftypefnx {Function File} {c =} nuwaveletcoeff (abc, ord, time, freq, window, winradius) +## @deftypefn {Function File} {c =} lswaveletcoeff (abc, ord, time, freq) +## @deftypefnx {Function File} {c =} lswaveletcoeff (abc, ord, time, freq, window) +## @deftypefnx {Function File} {c =} lswaveletcoeff (abc, ord, time, freq, window, winradius) ## ## Return the coefficient of the wavelet transform of the ## time series (@var{abc}, @var{ord}) at time @var{time} @@ 32,12 +32,12 @@ %! y = sin(x); %! xt = x'; %! yt = y'; %! a = nuwaveletcoeff(x,y,0.5,0.9) %! b = nuwaveletcoeff(xt,yt,0.5,0.9) +%! a = lswaveletcoeff(x,y,0.5,0.9) +%! b = lswaveletcoeff(xt,yt,0.5,0.9) %! ## Generates the wavelet transform coefficient for time 0.5 and circ. freq. 0.9, for row & column vectors. function coeff = nuwaveletcoeff( x , y , t , o , wgt = @cubicwgt , wgtrad = 1 ) +function coeff = lswaveletcoeff( x , y , t , o , wgt = @cubicwgt , wgtrad = 1 ) so = 0.05 .* o; if ( ( ndims(x) == 2 ) && ! ( rows(x) == 1 ) ) x = reshape(x,1,length(x)); This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. 