Subversion Repositories svnkaklik

Compare Revisions

Regard whitespace Rev 663 → Rev 664

/dokumenty/skolni/PRA1/10-Oscilace/oscilace.gp
0,0 → 1,51
#fituje harmonicke oscilace. vysledek ulozi ve formatu PostScript
#
 
set terminal postscript # nastavi format vystupniho souuboru
set samples 2000 # udava rozliseni Xve osy
set key off # vypne legendu v grafu
set xlabel "time [s]"
set ylabel "amplitude [1]"
 
set output "osc1.ps"
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
s=1913
#d=0.1
a=500
o=14
fi=pi
 
fit f(x) "osc1.txt" using 1:2 via a, d, o,fi ,s
plot f(x), "osc1.txt" using 1:2
pause 1
 
set output "osc2.ps"
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
s=1913
#d=0.1
a=500
o=14
fi=pi
 
fit f(x) "osc2.txt" using 1:2 via a, d, o,fi ,s
plot f(x), "osc2.txt" using 1:2
pause 1
 
set output "osc3.ps"
f(x)=a*exp(-d*x)*sin(o*x+fi)+s
s=1913
#d=0.1
a=500
o=14
fi=pi
 
fit f(x) "osc3.txt" using 1:2 via a, d, o,fi ,s
plot f(x), "osc3.txt" using 1:2
pause 1
 
#prevod Postscriptu do PDF nutno mit nainstalovany program ps2pdf.
 
!ps2pdf osc1.ps
!ps2pdf osc2.ps
!ps2pdf osc3.ps