jedna dimenzija ordinata

1 / 49

# jedna dimenzija ordinata - PowerPoint PPT Presentation

Informacijske mreže višedimenzijski prikaz slučajnih procesa Prof.dr.sc. Vjekoslav Sinković Zagreb, prosinac 2005. jedna dimenzija ordinata. n=10; x = Array[0 &amp;, n]; Do[x[[i]] = Random[Real, {1, n}], {i, 1, n}];

I am the owner, or an agent authorized to act on behalf of the owner, of the copyrighted work described.

## PowerPoint Slideshow about 'jedna dimenzija ordinata' - deron

Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author.While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server.

- - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - -
Presentation Transcript

### Informacijske mreževišedimenzijski prikaz slučajnih procesa Prof.dr.sc. Vjekoslav SinkovićZagreb, prosinac 2005.

jedna dimenzijaordinata

n=10;

x = Array[0 &, n];

Do[x[[i]] = Random[Real, {1, n}], {i, 1, n}];

X = {9.65556, 3.3627, 9.10544, 2.71287, 3.73145, 8.07959, 1.75329, 5.62793, 3.89536, 5.83288}

Informacije i komunikacije

dvije dimenzijeordinata, broj točaka

n = Random[Integer, {10, 50}];

x = Array[0 &, n];

Do[x[[i]] = Random[Real, {1, n}], {i, 1, n}];

n=28

X={9.1362, 24.9216, 22.2393, 24.7597, 16.0016, 17.841, 1.60125, 21.1987, 23.3694, 7.64981, 15.6282, 14.4597, 14.2514, 18.1125, 16.6616, 7.37162, 16.935, 12.9739, 8.46722, 13.1329, 14.6752, 26.0901, 26.7811, 25.6342, 6.53899, 2.16856, 5.54186, 1.87451}

Informacije i komunikacije

dvije dimenzije, grafikaordinata, broj točaka

ListPlot[x, Axes -> False, PlotStyle -> PointSize[0.02]];

Informacije i komunikacije

tri dimenzijeabscisa, ordinata, broj točaka

n = Random[Integer, {10, 50}];

x = Array[0 &, {n, 2}];

Do[x[[i, 1]] = Random[Real, {1, n}];

x[[i, 2]] = Random[Real, {1, n}], {i, 1, n}];

X={{24.3832, 16.1034}, {6.25415, 11.2344}, {30.5573, 7.237}, {22.7498, 29.2881}, {12.8888, 20.4203}, {1.86773, 20.7926}, {27.6421, 4.45513}, {27.9114, 4.61541}, {9.40853, 7.00164}, {29.5366, 7.76978}, {2.02321, 5.44356}, {23.4808, 6.60377}, {14.64, 26.3401}, {18.2266, 32.3694}, {21.0827, 20.1031}, {32.4768, 4.08134}, {9.19382, 36.6828}, {31.6091, 20.2888}, {18.5517, 33.2277}, {4.69765, 16.6734}, {10.1432, 27.2261}, {12.1611, 9.90358}, {9.11997, 22.7825}, {25.6803, 4.2998}, {31.48, 33.4423}, {8.45364, 8.9304}, {11.3973, 14.3392}, {12.9768, 5.84906}, {3.2035, 14.6564}, {18.3677, 22.5603}, {21.6518, 18.4287}, {14.6701, 6.88693}, {12.5086, 28.2026}, {3.50902, 33.9834}, {4.38865, 6.42013}, {14.8287, 30.6836}, {9.90868, 9.97778}}

Informacije i komunikacije

tri dimenzije, grafikaabscisa, ordinata, broj točaka

ListPlot[x, Axes -> False, PlotStyle -PointSize[0.02]];

Informacije i komunikacije

a = Random[];b = Random[];c = Random[];

ListPlot[x, Axes -> False, PlotStyle -> {RGBColor[a, b, c],PointSize[0.02]}];

Informacije i komunikacije

sedam dimenzija, grafikaabscisa, ordinata, broj točaka, RGB boja, veličina točke

a = Random[];b = Random[];c = Random[];

ListPlot[x, Axes -> False, PlotStyle -> {RGBColor[a, b, c], PointSize[Random[Real, {0.01, 0.03}]]}]

Informacije i komunikacije

m-put sedam dimenzijaabscisa, ordinata, broj točaka, RGB boja, veličina točke

m = 5;

Do[n = Random[Integer, {10, 50}];

x = Array[0 &, {n, 2}];

Do[x[[i, 1]] = Random[Real, {1, n}];

x[[i, 2]] = Random[Real, {1, n}], {i, 1, n}];

a = Random[];b = Random[];c = Random[];

ListPlot[x, Axes -> False, PlotStyle -> {RGBColor[a, b, c],

PointSize[Random[Real, {0.02, 0.05}]]}], {j, 1, m}];

Informacije i komunikacije

1.-put sedam dimenzijaabscisa, ordinata, broj točaka, RGB boja, veličina točke

Informacije i komunikacije

2.-put sedam dimenzijaabscisa, ordinata, broj točaka, RGB boja, veličina točke

Informacije i komunikacije

3.-put sedam dimenzijaabscisa, ordinata, broj točaka, RGB boja, veličina točke

Informacije i komunikacije

4.-put sedam dimenzijaabscisa, ordinata, broj točaka, RGB boja, veličina točke

Informacije i komunikacije

5.-put sedam dimenzijaabscisa, ordinata, broj točaka, RGB boja, veličina točke

Informacije i komunikacije

4-put sedam dimenzija, slaganje komponenataabscisa, ordinata, broj točaka, RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

coef=...

n = (Random[Integer, {1, coef}] + Round[-Log[1 - Random[]] coef ]);

x = Array[0 &, {n, 2}];

Do[x[[i, 1]] = Random[Real, {1, n}];

x[[i, 2]] = Random[Real, {1, n}], {i, 1, n}];

a = Random[];

b = Random[];

c = Random[];

g1 = ListPlot[x, Axes -> False,

PlotStyle -> {RGBColor[a, b, c],

PointSize[Random[Real, {0.01, 0.08}]]}];

g2,....,gm

Informacije i komunikacije

1.-put osam dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

2.-put osam dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

3.-put osam dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

3-put osam dimenzija, rezultatabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (1)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (2)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (3)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (4)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (5)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (6)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (7)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put osam dimenzija, rezultat (8)abscisa, ordinata, broj točaka (dvije dimenzije), RGB boja, veličina točke

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

coef=...

n = (Random[Integer, {1, coef}] + Round[-Log[1 - Random[]] coef ]);

x = Array[0 &, {n, 2}];

Do[x[[i, 1]] = Random[Real, {1, n}];

x[[i, 2]] = Random[Real, {1, n}], {i, 1, n}];

a = Random[];

b = Random[];

c = Random[];

g1 = ListPlot[x, PlotJoined -> True, Axes -> False,

PlotStyle -> {RGBColor[a, b, c],

Thickness[Random[Real, {0.001, 0.02}]]}];

g2,....,gm

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

m-put šesnajst dimenzijaabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Informacije i komunikacije

samo linije, primjer (1)

Informacije i komunikacije

samo linije, primjer (2)

Informacije i komunikacije

samo linije, primjer (3)

Informacije i komunikacije

samo linije, primjer (4)

Informacije i komunikacije

samo linije, primjer (5)

Informacije i komunikacije

samo linije, primjer (6)

Informacije i komunikacije

samo linije, primjer (7)

Informacije i komunikacije

m-put dvadeset četiri dimenzijeabscisa, ordinata, broj točaka (dvije dimenzije), RGB boja točke, veličina točke,

abscisa, ordinata, broj linija (dvije dimenzije), RGB boja linije, debljina linije

Sin (ampl. faza) cos (ampl. faza), RGB boja linije, debljina linije

n = Random[Integer, {50 Random[], 100 Random[]}];

x = Array[0 &, {n, 2}];

Do[x[[i, 1]] = n - Random[Real, {1, n}];

x[[i, 2]] = n - Random[Real, {1, n}], {i, 1, n}];

a = Random[];b = Random[];c = Random[];

g1 = ListPlot[x, Axes ->

False, PlotStyle -> {

RGBColor[a, b, c], PointSize[Random[Real, {0.02, 0.05}]]}];

a = Random[];b = Random[];c = Random[];

g5 = ParametricPlot[{(n/2) + n Sin[t], (n/2) + n Cos[t]}, {t, 0,

Random[]Pi}, Axes -> None, PlotStyle -> {RGBColor[

a, b, c], Thickness[Random[Real, {0,

0.02}]]}, AspectRatio -> Automatic];

Informacije i komunikacije