<p> plot(data,a,b,c) </p>

a9fc9828-b463-4478-9cab-98e46cc57fa1 7 4 5 decimal

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

data char size clr plot k 1 data rows range r3 k el char : r4 k el size : r5 k el clr : 13 mat for data r3 r4 r5 augment 21 line :

Hermite polynomial form ... expand in vector function n x H 1 n 0 ≡ 2 x * n 1 ≡ 1 - (k^n! (* k! (n 2 k * - (! (* / 2 x * (n 2 k * -^* k 0 n 2 / Floor sum cases 11 line :

Hermite explorer ... Export

j 9 : n 0 j range H n 1 + el n x H : for 21 line

select/collect H 3 el 21 - 2 x 2^* + (*

eval SYMBOLIC view all x H H :

n 6 :

x N n x H x expand maple : x N x N op maple : x 1 : v x N reverse : 12 mat 31 line

i 1 v rows range n 2 mod 0 ≡ Her 2 i * 1 - el v i el : Her 2 i * el v i el : if for

'n' even

r Her polyroots : r r eval : 21 sys

'n' odd

Plot roots of Lobatto roots r r 0 * augment : roots roots . 14 black plot : 21 line

@ too high 'n' ... no plot ... over max QuickPlot ...

roots n x H 2 1 sys

Her 120 - 07200480 - 06471 mat

r 0.436077411927617 - 0.436077411927617 1.3358490740137 - 1.3358490740137 2.35060497367449 - 2.35060497367449 61 mat

Hermite roots [20]sanity 15 D r 0.245340708300893 - 0.245340708300893 0.737473728545395 - 0.737473728545395 1.23407621539532 - 1.23407621539532 1.73853771211659 - 1.73853771211659 2.25497400208926 - 2.25497400208926 2.78880605842768 - 2.78880605842768 3.34785456738297 - 3.34785456738297 3.94476404011613 - 3.94476404011613 4.60368244955075 - 4.60368244955075 5.38748089001125 - 5.38748089001125 201 mat :