Subversion Repositories svnkaklik

Rev

Rev 619 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 619 Rev 664
1 
#fituje harmonicke oscilace. vysledek ulozi ve formatu PostScript
 1 
#fituje harmonicke oscilace. vysledek ulozi ve formatu PostScript
2 
#
2 
#
3 
 
 3 
 
4 
set terminal postscript # nastavi format vystupniho souuboru
 4 
set terminal postscript # nastavi format vystupniho souuboru
5 
set samples 2000 	# udava rozliseni Xve osy
5 
set samples 2000 	# udava rozliseni Xve osy
6 
set key off	# vypne legendu v grafu
 6 
set key off	# vypne legendu v grafu
7 
set xlabel "time [s]"
 7 
set xlabel "time [s]"
8 
set ylabel "amplitude [1]"
 8 
set ylabel "amplitude [1]"
9 
 
 9 
 
10 
set output "osc1.ps"
10 
set output "osc1.ps"
11 
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
 11 
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
12 
s=1913
 12 
s=1913
13 
#d=0.1
 13 
#d=0.1
14 
a=500
 14 
a=500
15 
o=14
 15 
o=14
16 
fi=pi
 16 
fi=pi
17 
 
 17 
 
18 
fit f(x) "osc1.txt" using 1:2 via a, d, o,fi ,s
18 
fit f(x) "osc1.txt" using 1:2 via a, d, o,fi ,s
19 
plot f(x), "osc1.txt" using 1:2
 19 
plot f(x), "osc1.txt" using 1:2
20 
pause 1
 20 
pause 1
21 
 
 21 
 
22 
set output "osc2.ps"
 22 
set output "osc2.ps"
23 
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
 23 
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
24 
s=1913
 24 
s=1913
25 
#d=0.1
 25 
#d=0.1
26 
a=500
 26 
a=500
27 
o=14
 27 
o=14
28 
fi=pi
 28 
fi=pi
29 
 
 29 
 
30 
fit f(x) "osc2.txt" using 1:2 via a, d, o,fi ,s
30 
fit f(x) "osc2.txt" using 1:2 via a, d, o,fi ,s
31 
plot f(x), "osc2.txt" using 1:2
 31 
plot f(x), "osc2.txt" using 1:2
32 
pause 1
 32 
pause 1
33 
 
 33 
 
34 
set output "osc3.ps"
 34 
set output "osc3.ps"
35 
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
 35 
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
36 
s=1913
 36 
s=1913
37 
#d=0.1
 37 
#d=0.1
38 
a=500
 38 
a=500
39 
o=14
 39 
o=14
40 
fi=pi
 40 
fi=pi
41 
 
 41 
 
42 
fit f(x) "osc3.txt" using 1:2 via a, d, o,fi ,s
42 
fit f(x) "osc3.txt" using 1:2 via a, d, o,fi ,s
43 
plot f(x), "osc3.txt" using 1:2
 43 
plot f(x), "osc3.txt" using 1:2
44 
pause 1
 44 
pause 1
45 
 
 45 
 
46 
#prevod Postscriptu do PDF nutno mit nainstalovany program ps2pdf.
 46 
#prevod Postscriptu do PDF nutno mit nainstalovany program ps2pdf.
47 
 
 47 
 
48 
!ps2pdf osc1.ps
 48 
!ps2pdf osc1.ps
49 
!ps2pdf osc2.ps
 49 
!ps2pdf osc2.ps
50 
!ps2pdf osc3.ps
 50 
!ps2pdf osc3.ps
51 
 
 51