| Prethodna tema :: Sljedeća tema |
| Autor/ica |
Poruka |
Gogs
Forumaš(ica)
Pridružen/a: 17. 10. 2002. (22:28:12)
Postovi: (155)16
Lokacija: Zagreb
|
 Postano: 14:55 pet, 19. 3. 2010 Naslov: |
    |
|
|
[quote="Debla"]A onaj zadtaka s matricama?
tj.fja prima matricu bilo koje dimenzije,i mora zamjenit sve dupliće u redovima s nulom:
{{1,2,2},{2,3,4},{3,4,5}}->{{1,0,0},{2,3,4},{3,4,5}}[/quote]
Evo rješenja:
[code:1]
M={{1,2,2},{3,4,5},{3,4,5}}
(* Obradi prima redak matrice (parametar a), i element matrice (x), te vraća 1 ako je broj pojavljivanja x u redu a 1, a 0 ako je 2 ili više*)
Obradi[a_, x_] := Boole[Count[a,x] < 2]
(* Table će vratiti oblik matrice jer se primjenjuje na dva indeksa, za svaki element matrice. Primjenjuje se tako da se svaki element matrice pomnoži s rezultatom funkcije Obradi za taj element *)
Table[M[[i,j]] * Obradi[M[[i]], M[[i,j]]], {i,Dimensions[M][[1]]}, {j,Dimensions[M][[2]]}]
[/code:1]
| Debla (napisa): | A onaj zadtaka s matricama?
tj.fja prima matricu bilo koje dimenzije,i mora zamjenit sve dupliće u redovima s nulom:
{{1,2,2},{2,3,4},{3,4,5}}→{{1,0,0},{2,3,4},{3,4,5}} |
Evo rješenja:
| Kod: |
M={{1,2,2},{3,4,5},{3,4,5}}
(* Obradi prima redak matrice (parametar a), i element matrice (x), te vraća 1 ako je broj pojavljivanja x u redu a 1, a 0 ako je 2 ili više*)
Obradi[a_, x_] := Boole[Count[a,x] < 2]
(* Table će vratiti oblik matrice jer se primjenjuje na dva indeksa, za svaki element matrice. Primjenjuje se tako da se svaki element matrice pomnoži s rezultatom funkcije Obradi za taj element *)
Table[M[[i,j]] * Obradi[M[[i]], M[[i,j]]], {i,Dimensions[M][[1]]}, {j,Dimensions[M][[2]]}]
|
_________________
Dvije stvari su beskonacne, svemir i ljudska glupost, ali sto se svemira tice nisam posve siguran.
|
|
| [Vrh] |
|
anekalo
Forumaš(ica)
Pridružen/a: 05. 03. 2007. (16:48:54)
Postovi: (55)16
|
|
| [Vrh] |
|
lyra
Forumaš(ica)
Pridružen/a: 17. 07. 2006. (21:23:44)
Postovi: (63)16
Spol: 
|
|
| [Vrh] |
|
anekalo
Forumaš(ica)
Pridružen/a: 05. 03. 2007. (16:48:54)
Postovi: (55)16
|
|
| [Vrh] |
|
Gogs
Forumaš(ica)
Pridružen/a: 17. 10. 2002. (22:28:12)
Postovi: (155)16
Lokacija: Zagreb
|
|
| [Vrh] |
|
Debla
Forumaš(ica)
Pridružen/a: 06. 12. 2005. (16:54:24)
Postovi: (94)16
Spol:
|
|
| [Vrh] |
|
Gogs
Forumaš(ica)
Pridružen/a: 17. 10. 2002. (22:28:12)
Postovi: (155)16
Lokacija: Zagreb
|
|
| [Vrh] |
|
Crazylamb1
Forumaš(ica)
Pridružen/a: 09. 06. 2006. (01:17:33)
Postovi: (12E)16
Spol: 
Lokacija: Albertane, Mars
|
| Postano: 4:47 sub, 12. 6. 2010 Naslov: |
|
|
|
Imam dva zadatka za fakultet (ne u Zg) koja treba rijesiti u Mathematici. Zanima me da li je netko voljan podijeliti te zadatke ako ih imate, a ako ne, bar da mi kazete da li to djeluje kao nesto sto je relativno jednostavno za isprogramirati ili ima dosta posla (s obzirom da sam pocetnik u Mathematici, a s programiranjem se odavno ne susrecem).
Hvala, i evo zadataka:
1. Napisati kod u Mathematica-i koji ce za proizvoljan
ucitani linearni sistem jednacina izbacivati informacije o
njegovom rjesenju.
Pod ovim se podrazumijeva da dobijemo output informacije
da li sistem ima ili nema rješenje, a ako ga ima, kako ona
glase (dakle ako imamo beskonacno mnogo rjesenja,
prikazati ih u zavisnosti od parametra). Metod i nacin,
kao i koje funkcije iz Mathematicae ce se koristiti nisu
ogranicene, bitno je da dobijemo informaciju o sistemu.
2. Za proizvoljnu funkciju jedne varijable, napisati kod
koji ce generalno izracunavati sve potrebne velicine za
crtanje grafa te funkcije. Dakle, izlazni rezultat je:
nule funkcije, parnost, limesi i asimptote, intervali
monotonosti funkcije i ekstremi, intervali konveksnosti i
prevojne tacke i na kraju graf funkcije zajedno sa svim
asimptotama.
Imam dva zadatka za fakultet (ne u Zg) koja treba rijesiti u Mathematici. Zanima me da li je netko voljan podijeliti te zadatke ako ih imate, a ako ne, bar da mi kazete da li to djeluje kao nesto sto je relativno jednostavno za isprogramirati ili ima dosta posla (s obzirom da sam pocetnik u Mathematici, a s programiranjem se odavno ne susrecem).
Hvala, i evo zadataka:
1. Napisati kod u Mathematica-i koji ce za proizvoljan
ucitani linearni sistem jednacina izbacivati informacije o
njegovom rjesenju.
Pod ovim se podrazumijeva da dobijemo output informacije
da li sistem ima ili nema rješenje, a ako ga ima, kako ona
glase (dakle ako imamo beskonacno mnogo rjesenja,
prikazati ih u zavisnosti od parametra). Metod i nacin,
kao i koje funkcije iz Mathematicae ce se koristiti nisu
ogranicene, bitno je da dobijemo informaciju o sistemu.
2. Za proizvoljnu funkciju jedne varijable, napisati kod
koji ce generalno izracunavati sve potrebne velicine za
crtanje grafa te funkcije. Dakle, izlazni rezultat je:
nule funkcije, parnost, limesi i asimptote, intervali
monotonosti funkcije i ekstremi, intervali konveksnosti i
prevojne tacke i na kraju graf funkcije zajedno sa svim
asimptotama.
|
|
| [Vrh] |
|
C
Forumaš(ica)
Pridružen/a: 29. 01. 2005. (17:27:47)
Postovi: (4C)16
Spol:
|
|
| [Vrh] |
|
goranm
Forumaš(ica)
Pridružen/a: 12. 11. 2002. (20:09:12)
Postovi: (906)16
Spol: 
|
| Postano: 20:36 ned, 6. 3. 2011 Naslov: |
|
|
|
[quote="Crazylamb1"]Imam dva zadatka za fakultet (ne u Zg) koja treba rijesiti u Mathematici. Zanima me da li je netko voljan podijeliti te zadatke ako ih imate, a ako ne, bar da mi kazete da li to djeluje kao nesto sto je relativno jednostavno za isprogramirati ili ima dosta posla (s obzirom da sam pocetnik u Mathematici, a s programiranjem se odavno ne susrecem).[/quote]
Ne bi trebalo biti puno posla jer sve funkcije koje ti trebaju su već implementirane u defaultnom paketu Mathematice.
[quote]1. Napisati kod u Mathematica-i koji ce za proizvoljan
ucitani linearni sistem jednacina izbacivati informacije o
njegovom rjesenju.
Pod ovim se podrazumijeva da dobijemo output informacije
da li sistem ima ili nema rješenje, a ako ga ima, kako ona
glase (dakle ako imamo beskonacno mnogo rjesenja,
prikazati ih u zavisnosti od parametra). Metod i nacin,
kao i koje funkcije iz Mathematicae ce se koristiti nisu
ogranicene, bitno je da dobijemo informaciju o sistemu.[/quote]
Ovdje se mogu iskoristiti funkcije [tt]Solve[/tt] i/ili [tt]Reduce[/tt] i pratiti njihov output (u sebi imaju ugrađeno sve što se ovdje traži), a i jednostavno se, prateći teoriju iz linearne algebre, napiše funkcija koja specijalno radi samo na sustavima linearnih jednadžbi.
[quote]2. Za proizvoljnu funkciju jedne varijable, napisati kod
koji ce generalno izracunavati sve potrebne velicine za
crtanje grafa te funkcije. Dakle, izlazni rezultat je:
nule funkcije, parnost, limesi i asimptote, intervali
monotonosti funkcije i ekstremi, intervali konveksnosti i
prevojne tacke i na kraju graf funkcije zajedno sa svim
asimptotama.[/quote]
Ovo isto ne bi trebalo biti prezahtjevno jer već je sve to implementirano u Mathematici. Funkcije koje će biti od koristi su npr. [tt]Solve[/tt], [tt]Minimize[/tt], [tt]Maximize[/tt], [tt]MinValue[/tt], [tt]MaxValue[/tt], [tt]Limit[/tt], [tt]Reduce[/tt], [tt]D[/tt] itd.
| Crazylamb1 (napisa): | | Imam dva zadatka za fakultet (ne u Zg) koja treba rijesiti u Mathematici. Zanima me da li je netko voljan podijeliti te zadatke ako ih imate, a ako ne, bar da mi kazete da li to djeluje kao nesto sto je relativno jednostavno za isprogramirati ili ima dosta posla (s obzirom da sam pocetnik u Mathematici, a s programiranjem se odavno ne susrecem). |
Ne bi trebalo biti puno posla jer sve funkcije koje ti trebaju su već implementirane u defaultnom paketu Mathematice.
| Citat: | 1. Napisati kod u Mathematica-i koji ce za proizvoljan
ucitani linearni sistem jednacina izbacivati informacije o
njegovom rjesenju.
Pod ovim se podrazumijeva da dobijemo output informacije
da li sistem ima ili nema rješenje, a ako ga ima, kako ona
glase (dakle ako imamo beskonacno mnogo rjesenja,
prikazati ih u zavisnosti od parametra). Metod i nacin,
kao i koje funkcije iz Mathematicae ce se koristiti nisu
ogranicene, bitno je da dobijemo informaciju o sistemu. |
Ovdje se mogu iskoristiti funkcije Solve i/ili Reduce i pratiti njihov output (u sebi imaju ugrađeno sve što se ovdje traži), a i jednostavno se, prateći teoriju iz linearne algebre, napiše funkcija koja specijalno radi samo na sustavima linearnih jednadžbi.
| Citat: | 2. Za proizvoljnu funkciju jedne varijable, napisati kod
koji ce generalno izracunavati sve potrebne velicine za
crtanje grafa te funkcije. Dakle, izlazni rezultat je:
nule funkcije, parnost, limesi i asimptote, intervali
monotonosti funkcije i ekstremi, intervali konveksnosti i
prevojne tacke i na kraju graf funkcije zajedno sa svim
asimptotama. |
Ovo isto ne bi trebalo biti prezahtjevno jer već je sve to implementirano u Mathematici. Funkcije koje će biti od koristi su npr. Solve, Minimize, Maximize, MinValue, MaxValue, Limit, Reduce, D itd.
_________________
The Dude Abides
|
|
| [Vrh] |
|
insane_raver
Forumaš(ica)
Pridružen/a: 05. 05. 2009. (21:55:06)
Postovi: (1DB)16
Spol:
Lokacija: ZGB
|
|
| [Vrh] |
|
Goran
Forumaš(ica)
Pridružen/a: 02. 07. 2003. (16:03:48)
Postovi: (2C)16
Spol:
|
|
| [Vrh] |
|
Saša
Forumaš(ica)
Pridružen/a: 22. 06. 2009. (20:27:00)
Postovi: (8)16
Spol:
|
|
| [Vrh] |
|
ß
Forumaš(ica)
Pridružen/a: 29. 07. 2006. (15:29:06)
Postovi: (115)16
Spol:
Lokacija: Graveyard Mountain Home
|
|
| [Vrh] |
|
jakob101
Forumaš(ica)
Pridružen/a: 02. 11. 2010. (15:21:08)
Postovi: (2)16
|
|
| [Vrh] |
|
C
Forumaš(ica)
Pridružen/a: 29. 01. 2005. (17:27:47)
Postovi: (4C)16
Spol:
|
|
| [Vrh] |
|
frances
Forumaš(ica)
Pridružen/a: 15. 07. 2006. (18:27:06)
Postovi: (39)16
Spol:
|
|
| [Vrh] |
|
insane_raver
Forumaš(ica)
Pridružen/a: 05. 05. 2009. (21:55:06)
Postovi: (1DB)16
Spol:
Lokacija: ZGB
|
| Postano: 15:20 čet, 10. 3. 2011 Naslov: |
|
|
|
[quote="frances"]Hvala Saša i jakob101
Dvoje ljudi pise kolokvij u petak, racunarci u pon u 12, a statisticari (i nastavnicki smjer, ja mislim) u utorak (ne znam vrijeme). S tim da ako netko ne moze u pon, moze u utorak i obrnuto[/quote]
statističari samo u utorak, nastavnički je tamo onaj drugi petak u 14, i ne znam što su se primjenjenci dogovorili
| frances (napisa): | Hvala Saša i jakob101
Dvoje ljudi pise kolokvij u petak, racunarci u pon u 12, a statisticari (i nastavnicki smjer, ja mislim) u utorak (ne znam vrijeme). S tim da ako netko ne moze u pon, moze u utorak i obrnuto |
statističari samo u utorak, nastavnički je tamo onaj drugi petak u 14, i ne znam što su se primjenjenci dogovorili
|
|
| [Vrh] |
|
Crazylamb1
Forumaš(ica)
Pridružen/a: 09. 06. 2006. (01:17:33)
Postovi: (12E)16
Spol:
Lokacija: Albertane, Mars
|
| Postano: 15:50 čet, 10. 3. 2011 Naslov: |
|
|
|
da, dakle, par studenata (dvoje) je sutra. racunarci u ponedjeljak (12h), statisticari utorak (ne znam 100%, ali cini mi se da je isto u 12h) i nastavnicki petak (iduci tjedan - ne znam kad, ali evo netko je napisao da je u 14h). a primijenjeni su cini mi se skupa s racunarcima u ponedjeljak, posto ih nema puno - cini mi se, ali ne sjecam se bas 100% (mozda 95%) :lol:
da, dakle, par studenata (dvoje) je sutra. racunarci u ponedjeljak (12h), statisticari utorak (ne znam 100%, ali cini mi se da je isto u 12h) i nastavnicki petak (iduci tjedan - ne znam kad, ali evo netko je napisao da je u 14h). a primijenjeni su cini mi se skupa s racunarcima u ponedjeljak, posto ih nema puno - cini mi se, ali ne sjecam se bas 100% (mozda 95%) 
|
|
| [Vrh] |
|
Masiela
Forumaš(ica)
Pridružen/a: 11. 09. 2007. (22:28:01)
Postovi: (338)16
Spol:
Lokacija: Među bananama
|
| Postano: 23:07 pet, 11. 3. 2011 Naslov: |
|
|
|
Evo Excel-Matlab seminar (aritmetičke sredine fajl su u ovaj podaci.xls).
Ne da mi nakačit .m file pa ću tu kopi-pejstat kod jednog zadačića kojeg smo finalni i ja trebali napravit.
Od random nxn matrice je trebalo napravit nxn matricu s nulama na dijagonali, a sve ostale elemente je trebalo podijelit sa sumom apsolutnih vrijednosti elemenata u tom retku.
[code:1]function var=modifikacija(n)
A=rand(n)
b1=diag(sum(abs(A')));
if det(b1)==0 %to ne treba jer nam se ionako neće desit jer su elementi matrice iz U(0,1)
fprintf('U nekom retku je suma aps. vr. elemenata jednaka nula')
else
b=diag(sum(abs(A')).^(-1));
D=(A'*b)';
trazena=zeros(n)+tril(D,-1)+triu(D,1)
end
end
[/code:1]
Evo Excel-Matlab seminar (aritmetičke sredine fajl su u ovaj podaci.xls).
Ne da mi nakačit .m file pa ću tu kopi-pejstat kod jednog zadačića kojeg smo finalni i ja trebali napravit.
Od random nxn matrice je trebalo napravit nxn matricu s nulama na dijagonali, a sve ostale elemente je trebalo podijelit sa sumom apsolutnih vrijednosti elemenata u tom retku.
| Kod: | function var=modifikacija(n)
A=rand(n)
b1=diag(sum(abs(A')));
if det(b1)==0 %to ne treba jer nam se ionako neće desit jer su elementi matrice iz U(0,1)
fprintf('U nekom retku je suma aps. vr. elemenata jednaka nula')
else
b=diag(sum(abs(A')).^(-1));
D=(A'*b)';
trazena=zeros(n)+tril(D,-1)+triu(D,1)
end
end
|
_________________ mladac: e.k.s. je možda 8%, moje znanje ni toliko  |
|
| [Vrh] |
|
|
