Dear developers,

because of a system upgrade I'm now working with optim-1.0.16 instead of 1.0.6
before. Now my program doesn't work any more and I get the following errors:

error: two-arg min expecting args of same size
error: called from:
error:   /usr/share/octave/packages/3.2/optim-1.0.16/__dfdp__.m at line 99,
column 13
error:   /usr/share/octave/packages/3.2/optim-1.0.16/dfdp.m at line 70, column
7
error:    at line -1, column -1
error:   /usr/share/octave/packages/3.2/optim-1.0.16/__lm_svd__.m at line 176,
column 9
error:   /usr/share/octave/packages/3.2/optim-1.0.16/leasqr.m at line 583,
column 26


I'm using leasqr and I get the error only when I fit only 1 parameter, 2
parameters work. I think I found the error (see the patch). The problem is,
that in these expressions:

  p1(idx1g2w) = max (p(idx1g2w) - absdel(idx1g2w), lbound(idx1g2w, 1));

the size differs because for some variables (lbound and ubound) two dimensions
are used, for the others only one. The result is that I have expressions like:

[](0x0) and [](0x1), that don't agree in size.


--
With kind regards!
Horst Hardelauf

Institut für Bio- und Geowissenschaften
IBG-3: Agrosphäre
Gebäude 16.6
Germany

Tel.: 00-49-(0)2461/61-3984
Fax.: 00-49-(0)2461/61-2518
E-Mail: h.hardel...@fz-juelich.de

------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------
Forschungszentrum Juelich GmbH
52425 Juelich
Sitz der Gesellschaft: Juelich
Eingetragen im Handelsregister des Amtsgerichts Dueren Nr. HR B 3498
Vorsitzender des Aufsichtsrats: MinDirig Dr. Karl Eugen Huthmacher
Geschaeftsfuehrung: Prof. Dr. Achim Bachem (Vorsitzender),
Karsten Beneke (stellv. Vorsitzender), Prof. Dr.-Ing. Harald Bolt,
Prof. Dr. Sebastian M. Schmidt
------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------
99c99
<   p1(idxvl) = min (p(idxvl) + absdel(idxvl), ubound(idxvl, 1));
---
>   p1(idxvl) = min (p(idxvl) + absdel(idxvl), ubound(idxvl));
101c101
<   p1(idxvg) = max (p(idxvg) - absdel(idxvg), lbound(idxvg, 1));
---
>   p1(idxvg) = max (p(idxvg) - absdel(idxvg), lbound(idxvg));
115,118c115,118
<   idxvs(idxnvs) = p1(idxnvs) < lbound(idxnvs, 1) | ...
<       p1(idxnvs) > ubound(idxnvs, 1);
<   del1 = p(idxvs) - lbound(idxvs, 1);
<   del2 = ubound(idxvs, 1) - p(idxvs);
---
>   idxvs(idxnvs) = p1(idxnvs) < lbound(idxnvs) | ...
>       p1(idxnvs) > ubound(idxnvs);
>   del1 = p(idxvs) - lbound(idxvs);
>   del2 = ubound(idxvs) - p(idxvs);
122c122
<   p1(idx1g2w) = max (p(idx1g2w) - absdel(idx1g2w), lbound(idx1g2w, 1));
---
>   p1(idx1g2w) = max (p(idx1g2w) - absdel(idx1g2w), lbound(idx1g2w));
124c124
< 		      ubound(idx1le2w, 1));
---
> 		      ubound(idx1le2w));
126,127c126,127
<   p1(idxnvd) = min (p(idxnvd) + absdel(idxnvd), ubound(idxnvd, 1));
<   p2(idxnvd) = max (p(idxnvd) - absdel(idxnvd), lbound(idxnvd, 1));
---
>   p1(idxnvd) = min (p(idxnvd) + absdel(idxnvd), ubound(idxnvd));
>   p2(idxnvd) = max (p(idxnvd) - absdel(idxnvd), lbound(idxnvd));
------------------------------------------------------------------------------
The demand for IT networking professionals continues to grow, and the
demand for specialized networking skills is growing even more rapidly.
Take a complimentary Learning@Cisco Self-Assessment and learn 
about Cisco certifications, training, and career opportunities. 
http://p.sf.net/sfu/cisco-dev2dev
_______________________________________________
Octave-dev mailing list
Octave-dev@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/octave-dev

Reply via email to