POLITECHNIKA LUBESLKA WYDZIAŁ ELEKTROTECHNIKI I INFORMATYKI
Laboratorium Metod numerycznych
Imię i nazwisko	Grupa ED 3.2	18:00-19:30	Ocena/Podpis
Bogusław Demidiuk	Data wykonywania 3.11.2008		Rok 2008/2009
Ćwiczenie 3	Temat: Edycja i tworzenie wykresów w Scilabie

Ad.1

x=linspace(-1,1,61)'; y=x^2; ybis=1-x^2; plot2d(x,ybis) yter=2*y; plot2d(x,yter) xbasc() plot2d(x,[y ybis yter]) xtitle("Wykreślanie 3 krzywych na wykresie","oś x","oś y")-Tytuł wykresu

-Obliczenie odciętych -Obliczanie rzędnych -Deklaracja zmiennych -Wykreślenie wykresu utworzonego na podstawie danego wektora -Deklaracja zmiennych -Wykreślenie wykresu utworzonego na podstawie danego wektora -Wymazanie zawartości okna graficznego -Wykreślenie wykresu utworzonego na podstawie danego wektora -Wyświetlenie opisu wykresu

Ad.2

x=linspace(0,15,200)'; y=besselj(1:5,x); xbasc() plot2d(x,y,style=[2,3,4,5,6],leg="J1@J2@J3@J4@J5@") xtitle("Funkcje Bessesa,J1,J2,J3,J4,J5","x","y")

-Obliczenie odciętych -Deklaracja Funkcji Bessela -Wymazanie zawartości okna graficznego -Wykreślenie wykresu utworzonego na podstawie danego wektora leg- umożliwia dodanie opisu do osi wykresu style- kolor wykresu -Wyświetlenie opisu wykresu

Ad.3

x=linspace(0,2*%pi,40)'; y=sin(x); yp=sin(x)+0,1*rand(x,"normal"); xbasc() plot2d(x,[yp y],style=[-2,2],leg="y=sin(x)+perturbation@y=sin(x)")

-Obliczenie odciętych -Obliczanie rzędnych -Podstawianie zmiennych -Wymazanie zawartości okna graficznego -Wykreślenie wykresu utworzonego na podstawie danego wektora

Ad.4

t=linspace(0,2*%pi,60)'; xbasc() x1=2*cos(t);y1=sin(t); x2=cos(t);y2=y1 x3=linspace(-2,2,60)';y3=erf(x3); legenda="elipsa@okr\{a}g@funkcja b\1{}k{e}du" plot2d([x1 x2 x3],[y1 y2 y3],style=[1,2,3],frameflag=4,leg=legenda xtitle("I znowu krzywe na rysunku")

-Deklaracja zmiennych -Wymazanie zawartości okna graficznego -Podstawianie zmiennych -Podstawianie zmiennych -Podstawianie zmiennych erf- funkcja błędu -Umożliwia umieszczenie na aktywnym wykresie legendy -Wykreślenie wykresu utworzonego na podstawie danego wektora leg- umożliwia dodanie opisu do osi wykresu style- kolor wykresu -Wyświetlenie opisu wykresu

Ad.5

x=linspace(-5, 5, 200)'; y=1./(1+x.^2); xbasc() plot2d(x, y, frameflag=1, rect=[-6, 0, 6, 1.1]) xtitle("Funkcja Runge-Kutty")

-Obliczenie odciętych -Obliczanie rzędnych -Wymazanie zawartości okna graficznego -Wykreślenie wykresu utworzonego na podstawie danego wektora frameflag- decyduje o zakresie wyświetlania współrzędnych, przyjmuje wartości z zakresu 0-8. Domyślna wartość 8. rect- Dzięki temu samodzielnie określamy obszar rysowania -Wyświetlenie opisu wykresu

Ad.6

x=linspace(-14,14,300)'; y=sin(x); xbasc() plot2d(x,y,style=2,axesflag=5) xtitle("Funkcja sinus")

-Obliczenie odciętych -Obliczanie rzędnych -Wymazanie zawartości okna graficznego -Wykreślenie wykresu utworzonego na podstawie danego wektora axesflag- ustawia sposób wyświetlania osi i ramki style- kolor wykresu -Wyświetlenie opisu wykresu

Ad.7

n=10; x=(0:n)'; y=x; xbasc() plot2d2(x,y,style=2,frameflag=5, rect=[0,-1,n+1,n+1] xtitle("Przykład zastosowania instrukcji plot2d2")

-Deklaracja zmiennych -Obliczenie odciętych -Obliczanie rzędnych -Wymazanie zawartości okna graficznego -Wykres schodkowy style- kolor wykresu frameflag- decyduje o zakresie wyświetlania współrzędnych, przyjmuje wartości z zakresu 0-8. Domyślna wartość 8. rect- Dzięki temu samodzielnie określamy obszar rysowania -Wyświetlenie opisu wykresu

Ad.8

n=6; x=(0:n)'; y=binomial(0.5,n); xbasc() plot2d3(x,y,style=2,frameflag=5,rect=[-1,0,n+1,0.32]) xtitle("Prawdopodobienstwo dla prawa binomialnego B(6,1/2)")

-Deklaracja zmiennych -Obliczenie odciętych -Obliczanie rzędnych -Wymazanie zawartości okna graficznego -Wykres impulsowy style- kolor wykresu frameflag- decyduje o zakresie wyświetlania współrzędnych, przyjmuje wartości z zakresu 0-8. Domyślna wartość 8. rect- Dzięki temu samodzielnie określamy obszar rysowania -Wyświetlenie opisu wykresu

Ad.9

x1=linspace(0,1,61)'; x2=linspace(0,1,31)'; x3=linspace(0.1,0.9,12)'; y1=x1.*cos(2*%pi*x1); y2=x2.*(1-x2); y3=x3.*(1-x3)+0.1*(rand(x3)-0.5); ymin=min([y1;y2;y3]); ymax=max([y1;y2;y3]); dy=(ymax-ymin)*0.05; rect=[0,ymin-dy,1,ymax+dy]; xbasc() plot2d(x1,y1,style=1,frameflag=5,rect=rect) plot2d(x2,y2,style=2,frameflag=0) plot2d(x3,y3,style=-1,frameflag=0) xtitle("Rysowanie wiekszej ilosci krzywych zlozonych z roznej ilosci punktow")

-Obliczenie odciętych -Obliczenie odciętych -Obliczenie odciętych -Obliczanie rzędnych -Obliczanie rzędnych -Obliczanie rzędnych -Najmniejsza wartość rzędnych -Największa wartość rzędnych -Podstawienie zmiennych -Dzięki temu samodzielnie określamy obszar rysowania -Wymazanie zawartości okna graficznego -Wykres logarytmiczny style- kolor wykresu frameflag- decyduje o zakresie wyświetlania współrzędnych, przyjmuje wartości z zakresu 0-8. Domyślna wartość 8. rect- Dzięki temu samodzielnie określamy obszar rysowania -Wyświetlenie opisu wykresu

Ad.10

dl=linspace(-%pi,%pi); y1=sin(dl); y2=cos(dl); xbasc(); xtitle('Wykresy funkcji trygonometrycznych','wartosci na osi odcietych','wartosci na osi rzednych') legend('funkcja sinus','funkcja kosinus',2) xset('tthickness',1) plot(dl,[y1',y2'],style=[5,3,2]);

-Deklaracja zmiennych -Obliczanie rzędnych -Obliczanie rzędnych -Wymazanie zawartości okna graficznego -Wyświetlenie opisu wykresu -Miejsce położenia legendy -Grubość linii w pikselach -Wykreślenie wykresu utworzonego na podstawie danego wektora style- kolor wykresu

Ad.11

set figure_style new xbasc(); t=0:0.1:2*%pi; a=gca(); a.data_bounds=[t(1) -1.8;t($) 1.8]; plot2d(t,[cos(t'),cos(2*t'),cos(3*t')],[-1,2,3]); e=gce(); e.children(1).thickness=3; e.children(2).line_style=4; hl=legend(['cos(t)';'cos(2*t)';'cos(3*t)'], a=1);

-Ustawia właściwości obiektu -Wymazanie zawartości okna graficznego -Deklaracja zmiennej -Obrót wokół osi -Wykres logarytmiczny -Pobiera aktualnie używanie dane -Grubość linii -Kolor linii -Miejsce położenia legendy

Ad.12

nr=[1:20]; x=[1;10]; y=[1;1]; xinit() xset('thickness',6) plot2d(x,y*nr,style=nr)

-Deklaracja Macierzy -Deklaracja Macierzy -Deklaracja Macierzy -Inicjalizacja graficzna -Grubość linii w pikselach -Wykres logarytmiczny

Ad.13

xbasc() nr=[1:20]; x=[1:10]'; y=ones(x); xinit() plot(x,y*nr,style=nr)

-Wymazanie zawartości okna graficznego -Deklaracja Macierzy -Deklaracja Macierzy -Obliczanie rzędnych -Inicjalizacja graficzna -Wykreślenie wykresu utworzonego na podstawie danego wektora

Ad.14

x1=linspace(0,1,61)'; x2=linspace(0,1,31)'; x3=linspace(0.1,0.9,12)'; y1=x1.*(1-x1).*cos(2*%pi*x1); y2=x2.*(1-x2); y3=x3.*(1-x3)+0.1*(rand(x3)-0.5); ymin=min([y1;y2;y3]); ymax=max([y1;y2;y3]); dy=(ymax-ymin)*0.05; rect=[0,ymin-dy,2,ymax+dy]; xbasc() plot2d(x1,y1,style=1,frameflag=5,rect=rect) plot2d(x2,y2,style=2,frameflag=0) plot2d(x3,y3,style=-1,frameflag=0) xtitle("Rysowanie wiekszej ilosci krzywych na wykresie")

-Obliczenie odciętych -Obliczenie odciętych -Obliczenie odciętych -Obliczanie rzędnych -Obliczanie rzędnych -Obliczanie rzędnych -Najmniejsza wartość rzędnych -Największa wartość rzędnych -Podstawienie zmiennych -Dzięki temu samodzielnie określamy obszar rysowania -Wymazanie zawartości okna graficznego -Wykres logarytmiczny style- kolor wykresu frameflag- decyduje o zakresie wyświetlania współrzędnych, przyjmuje wartości z zakresu 0-8. Domyślna wartość 8. rect- Dzięki temu samodzielnie określamy obszar rysowania -Wyświetlenie opisu wykresu

Ad.15

n=4000; L=0.6;l=0.3;r=0.7; nb_tours=4; t=linspace(0,nb_tours*2*%pi,n)'; xg=r*cos(t); yg=r*sin(t); xy=[-L/2 L/2 L/2 -L/2;...-l/2 -l/2 l/2 l/2]; xselec() driver("X11") xset("pixmap",1,8) plot2d(\%inf,\inf,frameflag=3,rect=[-1,-1,1,1],axesflag=0) xset("background",5); xbasr() xset("thickness",3) xset("font",2,4) for i=1:n xset("wwpc") theta=3*t(i) xyr=[cos(theta)-sin(theta);...sin(theta) cos(theta)]*xy; xset("color",2) xfploy(xyr(1,:)+xg(i),xyr(2,:)+yg(i)) xset("color",5) xfploy(xyr(1,:)+xg(i),xyr(2,:)+yg(i),"lines",1) xset("color",32); xtitle("Animations simple") xset(wshow") end driver("Rec") xset("default")

-Deklaracja zmiennych -Deklaracja zmiennych -Deklaracja zmiennych -Deklaracja zmiennych -Deklaracja zmiennych -Deklaracja macierzy -Podnosi bieżące okno graficzne -Wybiera sterownik graficzny -Pixmapa przesyłana do okna graficznego -Wykres logarytmiczny frameflag- decyduje o zakresie wyświetlania współrzędnych, przyjmuje wartości z zakresu 0-8. Domyślna wartość 8. rect- Dzięki temu samodzielnie określamy obszar rysowania axesflag- ustawia sposób wyświetlania osi i ramki -Ustala kolor tła -Przerysowuje okno graficzne -Grubość linii w pikselach -Definiuje czcionkę i jej wielkość -Instrukcja pętli -Przenosi pixmapę do okna graficznego -Umożliwia przedefiniowanie zgodnie ze współrzędnymi sferycznymi orientacje generowanego wykresu -Deklaracja zmiennych -Ustala kolor rysowania -Ustala kolor rysowania -Ustala kolor rysowania -Wyświetlenie opisu wykresu -Czyni okno numer okna , a gdy go nie ma to je tworzy -Kończy instrukcję pętli -Wybiera sterownik graficzny -Przywraca wartości domyślne

Ad.16

x=linspace(-%pi,%pi,31); z=sin(x)'*sin(x); n=200; theta=linspace(30,360,n); apha=[linspace(60,0,n/2) linspace(0,80,n/2)]; xselect() xset("pixmap",1) driver("X11") for i=1:n xset("wwpc") plot3d(x,y,z,theta=theta(i),apha=apha(l),leg="x@y@z",flag=[2 4 4]) xtitle("Zmiany punktu widzenia przy pomoc parametru apha") xset("wshow") end for i=1:n xset("wwpc") plot3d(x,y,z,theta=theta(i),apha=apha(l),leg="x@y@z",flag=[2 4 4])) xtitle("Zmiany punktu widzenia przy pomocy apha") xset("wshow") end xset("pixmap",0) driver("Rec")

-Deklaracja zmiennych -Deklaracja zmiennych -Deklaracja zmiennych -Umożliwia przedefiniowanie zgodnie ze współrzędnymi sferycznymi orientacje generowanego wykresu -Podnosi bieżące okno graficzne -Pixmapa przesyłana do okna graficznego -Wybiera sterownik graficzny -Instrukcja pętli -Przenosi pixmapę do okna graficznego -Wykres 3D -Wyświetlenie opisu wykresu -Czyni okno numer okna , a gdy go nie ma to je tworzy -Kończy instrukcję pętli -Przenosi pixmapę do okna graficznego -Wykres 3D -Wyświetlenie opisu wykresu -Kończy instrukcję pętli -Grafika wyświetlana bezpośrednio na ekranie -Wybiera sterownik graficzny

Ad.17

t=linspace(0,4*%pi,100); x=cos(t);y=sin(t); z=0.1*t; param3d(x,y,z) x2=x1+0.1*(1-rand(x1)); y2=x1+0.1*(1-rand(y1)); z2=x1+0.1*(1-rand(z1)); xbasc() xset("font",2,3) param3d1([x1 x2],[y1 y2],list[z1 z2],[1,-9],flag=[4 4]) xset("font",4,4) xtitle("Spirala z perelkami")

-Deklaracja zmiennych -Działki krzywych parametrycznych -Wymazanie zawartości okna graficznego -Definiuje czcionkę i jej wielkość -Wykres 3D flag-ustawia parametry kreślonego wykresu i osi, za pomocą trzech parametrów mode, type, box -Wyświetlenie opisu wykresu

---