Matematički softver

[Mala_022]

Je li netko uspio riješiti 2. zadatak za vježbu I je li tko već pisao kolokvij (ako da, može zadaci )

[vedraf]

Ja sam ga riješio za dani slučaj ,ali općenito nikako da ga riješim....
Ne razumijem zašto ne mogu staviti CharacteristicPolynomial[m, x] u Plot,nikako mi ne želi nacrtati,a kada stavim izračunatu vrijednost karakterističnog polinoma u Plot bez problema mi nacrta i to dobro nacrta (za dani primjer).
Vjerojetno rezultat od CharacteristicPolynomial[m, x] nije operativan,ali nemam pojma što umjesto toga
Što se tiče kolokvija mislim da nitko nije jučer pisao, nije bilo nikoga na popisu za jučer

[Mad Wilson]

@vedraf: mozes ali ovako:

[chiica]

Evo jednog jednostavnijeg rjesenja (ne mog, nego od jedne kolegice - hvala kolegici )

[Mad Wilson]

Lijena kolegica nije napisala da je poziv funkciji CharacteristicPolynomial[m,x] ekvivalentan pozivu Det[m-idx] (pise u manualu).

_________________
1 2 3 4

[Marvin]

Minimalna varijacija na temu je:

[Mad Wilson]

[Mala_022]

Opet ja
Zna li neko riješiti onaj zadatak s clusterima (koristeći samo funkcije iz Matlaba 7.1., tj. onog koji je instaliran u praktikumima)

[FFF]

...jucer je jedna cura pisala kolokvij, pa evo zadatka:
treba napraviti funkciju koja kao argument prima kvadratnu matricu te ako je ona dijagonalno dominantna, funkcija ispisuje matricu koja na dijagonali ima 0, a ostali elementi su podijeljeni sa ogovarajucom vrijednosti na dijagonali u tom retku.


Nap: smije se koristiti jedan if, i ne smiju se koristiti for i while petlje

uzivajte!

[vedraf]

[FFF]

function a=dom(m)
z=abs(diag(m))';
y=sum(abs(m'))-z;
x=z-y;
pom=(x>=0);
pom2=(x==0);
n=max(size(z));
if (sum(pom)~=n)||(sum(pom2)==n)
display('Matrica nije dijagonalno dominantna')
else
temp=m-diag(diag(m),0);
temp2=diag(m).^(-1);
temp2=repmat(temp2,1,n);
a=temp.*temp2;
end

...ja se nadam da ovo valja....

[FFF]

Danasnji zadatak:

u m.file-u definirati funkciju koja prima dva vektora (x i p) te racuna njihovo ocekivanje. Zatim, (u command window-u) x treba ucitati iz neke tekstualne datoteke, a p (koji je iste velicine kao i x) je vektor slucajnih brojeva i njega treba izgenerirati s tim da suma tog vektora mora biti jedan.

uzivajte!

[chiica]

evo moje rjesenje za zadatak od srijede:

[5ra]

pozdrav svima. imam par pitanja što se tiče matematičkog softvera. koji se točno softver radi? latex i mathematica ili matlab? i još nešto, dal bi to mogao slušat netko tko je s nekog drugog odsjeka na pmf-u, u smislu dal bi bilo prenaporno ili teško?
hvala svima!

_________________
http://www.youtube.com/watch?v=xYVoUEly-jA

[Luuka]

Koliko ja znam, rade se Matlab, Mathematica i LaTex. Prvo dvoje drži prof Nogo, a LaTex prof Ungar.

evo i link

_________________
"Bolje bi prolazio na faxu da sam na drogama nego na netu" - by a friend of mine
"Poslije spavanja doma spavanje bilo di mi je najdraža stvar" - by the same guy

[shumi1]

[Debla]

jel neko zna rješenje onog zadatka što prikazuje štap koji se kliže , i crta putanju težišta?

_________________

[M.M.]

Ovo je samo jedan nacin, sigurno postoji i bolji ..
(nisam sigurna da mozemo If koristiti)
Animate[Show[
ListLinePlot[{{k, 0}, {0, N[Sqrt[100 - k^2]]}},
PlotRange → {{0, 10}, {10, 0}}, AspectRatio → 1],
Graphics[{PointSize[0.02],
Point[{ k/2, N[Sqrt[100 - k^2]/2]}]} ] ,
If[k > 0,
ListLinePlot[lista = Prepend[lista, {k/2, N[Sqrt[100 - k^2]/2]}]],
lista = {}]], {k, 0, 10, 0.2} ]

_________________
tea

[strac]

Evo bez if-a

f[k_] := Prepend[lista, {k/2, N[Sqrt[100 - k^2]/2]}] /; k > 0;
f[k_] := {} /; k ⇐ 0;

Animate[Show[
ListLinePlot[{{k, 0}, {0, N[Sqrt[100 - k^2]]}},
PlotRange → {{0, 10}, {10, 0}}, AspectRatio → 1],
Graphics[{PointSize[0.02], Point[{k/2, N[Sqrt[100 - k^2]/2]}]} ] ,
ListLinePlot[lista = f[k]]], {k, 0, 10, 0.2} ]

[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}}

_________________