| r4 | ||
|---|---|---|
| r3 | 1 | == 1 == |
| r2 | 2 | table = @[6,3] |
| r4 | 3 | matr = [64.5@E6,40@E6,48.5@E6]; |
| 4 | susc = +@pi*10@E-7*4 | |
| r2 | 5 | freq = [10@E4,10@E5,10@E6,10@E7,10@E8,10@E9] |
| 6 | ||
| 7 | for [row, column] in table | |
| r4 | 8 | table(row,column) = (1/+sqrt(+@pi*matr(column)*freq(row)*susc)) |
| r2 | 9 | end |
| r3 | 10 | table |
| 11 | ||
| 12 | == 2 == | |
| 13 | table = @[6] | |
| 14 | matr = 64.5@E6 | |
| 15 | freq = [10@E4,10@E5,10@E6,10@E7,10@E8,10@E9] | |
| 16 | ||
| 17 | for [row] in table | |
| 18 | table(row) = (1/sqrt(@pi*matr*freq(row))) | |
| 19 | end | |
| 20 | ||
| 21 | LogisticFitPlot(freq,1/sqrt(@pi*matr*x)) |