Prethodna tema :: Sljedeća tema |
Autor/ica |
Poruka |
Antonija Forumaš(ica)


Pridružen/a: 04. 11. 2007. (09:38:06) Postovi: (139)16
|
|
[Vrh] |
|
goranm Forumaš(ica)


Pridružen/a: 12. 11. 2002. (20:09:12) Postovi: (906)16
Spol: 
|
Postano: 21:15 sub, 16. 5. 2009 Naslov: |
|
|
Može nacrtati npr. kombinacijom naredbi [tt]Line[/tt] i [tt]Points[/tt], može i ovako
[code:1]ListPlot[Table[{i, 0}, {i, 0, 10}], Axes -> {True, False}][/code:1]
[img]http://i40.tinypic.com/f418x0.jpg[/img]
Vjerojatno se može složiti i da par točaka bude pomično, treba se prokopat po helpu. :)
Može nacrtati npr. kombinacijom naredbi Line i Points, može i ovako
Kod: | ListPlot[Table[{i, 0}, {i, 0, 10}], Axes -> {True, False}] |
Vjerojatno se može složiti i da par točaka bude pomično, treba se prokopat po helpu.
_________________ The Dude Abides
|
|
[Vrh] |
|
Antonija Forumaš(ica)


Pridružen/a: 04. 11. 2007. (09:38:06) Postovi: (139)16
|
|
[Vrh] |
|
Novi Forumaš(ica)

Pridružen/a: 17. 07. 2007. (12:08:32) Postovi: (11F)16
Spol: 
|
|
[Vrh] |
|
Antonija Forumaš(ica)


Pridružen/a: 04. 11. 2007. (09:38:06) Postovi: (139)16
|
|
[Vrh] |
|
goranm Forumaš(ica)


Pridružen/a: 12. 11. 2002. (20:09:12) Postovi: (906)16
Spol: 
|
Postano: 23:40 sub, 16. 5. 2009 Naslov: |
|
|
[quote="Antonija"]hvala, hvala...
pokusavam iskombinirat nesto ali mi ne ide bas... :?
uglavnom, ono sto mi konkretno treba je na brojevnoj crti prikazat decimalne brojeve, razlomke... (za osnovnu skolu)[/quote]
Pa, ako ih ima mali broj, ručno ih upiši. Npr.
[code:1]Graphics[{Line[{{0, 0}, {2, 0}}], Point[{1/2, 0}],
Text[1/2, {1/2, -1/8}], Point[{1/3, 0}], Text[1/3, {1/3, -1/8}],
Point[{1/4, 0}], Text[1/4, {1/4, -1/8}], Point[{Sqrt[2], 0}],
Text[Sqrt[2], {Sqrt[2], -1/8}]}][/code:1]
[img]http://i40.tinypic.com/2qk8akw.jpg[/img]
Antonija (napisa): | hvala, hvala...
pokusavam iskombinirat nesto ali mi ne ide bas...
uglavnom, ono sto mi konkretno treba je na brojevnoj crti prikazat decimalne brojeve, razlomke... (za osnovnu skolu) |
Pa, ako ih ima mali broj, ručno ih upiši. Npr.
Kod: | Graphics[{Line[{{0, 0}, {2, 0}}], Point[{1/2, 0}],
Text[1/2, {1/2, -1/8}], Point[{1/3, 0}], Text[1/3, {1/3, -1/8}],
Point[{1/4, 0}], Text[1/4, {1/4, -1/8}], Point[{Sqrt[2], 0}],
Text[Sqrt[2], {Sqrt[2], -1/8}]}] |
_________________ The Dude Abides
|
|
[Vrh] |
|
kenny Petica iz zalaganja


Pridružen/a: 28. 03. 2003. (09:18:36) Postovi: (3B7)16
Spol: 
Lokacija: ...somewhere over the rainbow...
|
|
[Vrh] |
|
Antonija Forumaš(ica)


Pridružen/a: 04. 11. 2007. (09:38:06) Postovi: (139)16
|
|
[Vrh] |
|
CrniVG Forumaš(ica)

Pridružen/a: 19. 02. 2009. (22:44:19) Postovi: (23)16
|
|
[Vrh] |
|
goranm Forumaš(ica)


Pridružen/a: 12. 11. 2002. (20:09:12) Postovi: (906)16
Spol: 
|
Postano: 20:41 uto, 30. 6. 2009 Naslov: Re: :?: |
|
|
[quote="CrniVG"]Da ne otvaram novi topic, kako u Mathematici (ustvari na WolframAlpha-i na webu) nacrtat dvije funkcije na istom grafikonu, npr.
[code:1]plot y=(3/4)x+11[/code:1] nacrta jednu, a [code:1]plot y^2=18x[/code:1] drugu... kako da napišem da ih nacrta na istom grafikonu?
I možda da ubaci i neku točku u graf....[/quote]
WolframAlpha:
[code:1]Plot[{3/4x+11, Sqrt[18x],-Sqrt[18x]}][/code:1]
Mathematica:
[code:1]Plot[{3/4x+11, Sqrt[18x],-Sqrt[18x]},{x,-10,10}][/code:1]
Za ubacivanje točke bi trebao još koristiti Show, Point, Graphics itd.
[code:1]Show[Plot[3/4 x + 11, {x, -15, 15},
PlotRange -> {{-15, 15}, {-15, 15}}],
Plot[Sqrt[18 x], {x, -15, 15}], Plot[-Sqrt[18 x], {x, -15, 15}],
Graphics[Point[{5, 5}]]][/code:1]
Ovo zadnje WolframAlpha neće uspjet prožvakat. :)
CrniVG (napisa): | Da ne otvaram novi topic, kako u Mathematici (ustvari na WolframAlpha-i na webu) nacrtat dvije funkcije na istom grafikonu, npr.
nacrta jednu, a drugu... kako da napišem da ih nacrta na istom grafikonu?
I možda da ubaci i neku točku u graf.... |
WolframAlpha:
Kod: | Plot[{3/4x+11, Sqrt[18x],-Sqrt[18x]}] |
Mathematica:
Kod: | Plot[{3/4x+11, Sqrt[18x],-Sqrt[18x]},{x,-10,10}] |
Za ubacivanje točke bi trebao još koristiti Show, Point, Graphics itd.
Kod: | Show[Plot[3/4 x + 11, {x, -15, 15},
PlotRange -> {{-15, 15}, {-15, 15}}],
Plot[Sqrt[18 x], {x, -15, 15}], Plot[-Sqrt[18 x], {x, -15, 15}],
Graphics[Point[{5, 5}]]] |
Ovo zadnje WolframAlpha neće uspjet prožvakat.
_________________ The Dude Abides
|
|
[Vrh] |
|
|