<p> linfit modules </p>

22de877c-7088-47b3-9ec1-54287f8747eb 3 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

vx vy char size color plotG n vx length : plot vx 1 el vy 1 el char size color augment : i 2 n range plot plot vx i el vy i el char size color augment stack : for plot 41 line :

Applicable parts are: Optimiz "numeric" XY f φ β βlinfit X XY 1 col : Y XY 2 col : n XY rows : k x β φ length 1 - : vx raw initial vector fit i 1 X length range vx i el X i el β f eval : for M-> Cholesky Gradient Matrix j 1 k range i 1 n range M i j el X i el β φ j 1 + el eval : for for Cholesky solver [LS] Φ M transpose M * : d M transpose Y vx - (* : Δβ Φ 1 -^eval d * : b β Δβ + : 131 line :

Vector gradient ... Optimiz Symbolic x β f n φ ct 1 : i 1 n range PD ct el x β f (β ct el diff : stack f(x,β) & PD V 1 el x β f : V i 1 + el PD i el : 21 line ct ct 1 + : 41 line for V 31 line :

XY 75274 - 100160 - 125104 - 150 71.5 - 200 35.2 - 250 16.2 - 300 4.2 - 4009500 16.9 600 21.3 70024112 mat :

data XY 1 col XY 2 col . 12 red plotG :

XY XY 111 range 12 range el :

order 4 :

X XY 1 col : Y XY 2 col : 21 line

x β p 0.98.6179.21440 n 0 order range F 1 el 1 : n 0 ≡ F n 1 + el β n el 1 x / (n^* : cases for F 31 line :

Prepare the 'Unary β' i 1 order range β i el 1 : for

β transpose 111114 mat

3. Collect  the model function x β f x β p n el n 1 order 1 + sum 11 line :

x c 175 x ≤ (x 750 ≤ (& cases :

set 'n' to length β n β rows :

vector gradient x β φ x β f n φ :

The "linfit" coefficients s XY f φ β βlinfit :

CWD C:\SmathFile CurrentDirectory :

s CWD linfit wfile 1

s CWD linfit rfile :

x G s m el 1 x / (m^* m 1 order sum :

x G 0 ≡ x 300350 solve 305.7315

u deriv u G u diff :

linfit rational to Broyden data set

x G x c * data 2 1 sys

s 24757.9902 1.0351 107^* - 9.5765 108^* 3.2761 1010^* - 41 mat

x G x diff x c * 75 10 75 1 - 2 2 mat 2 1 sys

75 deriv 9.1

x G x 400700 int 4641