[ petarm @ 10.12.2010. 11:52 ] @
Trebalo bi da izracunam integral




su konstante razlicite od nula. Htedoh posle dugog vremena ne rada u Mathematici ovo da izracunam. Ali bezuspesno.



Mathematica nece da izbaci rezultat. Dodefinisao sam u predkoraku

, al opet nista. Kako da dodefinisem sve ovo ne bi li mi Mathematica izbacila rezultat. Unapred hvala na odgovoru!
[ atomant @ 11.12.2010. 11:32 ] @
Je l si probao da koristis Assumptions?

To kod jednostrukih integrala ide ovako nekako:

Code:
Integrate[f(x),{x,0,2*pi/a},Assumptions -> {a > 0 && Element[a, Reals],S > 0 && Element[S, Reals],J > 0 && Element[J, Reals]}]


Probaj da dodas to u uglastoj zagradi (N[izraz,ovde])
[ petarm @ 11.12.2010. 13:11 ] @
Hvala na odgovoru! Pogledacu danas!
[ petarm @ 12.12.2010. 14:14 ] @
Nece da radi!
[ atomant @ 12.12.2010. 15:55 ] @


Code:
Integrate[
 Coth[(6 *J *S Sqrt[1 - 1/9 (Cos[a*x] + Cos[a*y] + Cos[a*z])^2])/
  T]/Sqrt[1 - 1/9*(Cos[a*x] + Cos[a*y] + Cos[a*z])^2], {x, 0, (
  2*\[Pi])/a}, {y, 0, (2*\[Pi])/a}, {z, 0, (2*\[Pi])/a}, 
 Assumptions -> {a > 0 && a \[Element] Reals, 
   S > 0 && S \[Element] Reals, J > 0 && J \[Element] Reals, 
   T > 0 && T \[Element] Reals}]


Ovo je sintaksno tacno, ali radi vec pola sata kod mene i nista ne ispisuje.
Ne mozes da koristis N[] zato sto on trazi numericku vrednost, a ti imas nepoznate konstante.
[ petarm @ 12.12.2010. 18:24 ] @
Kako onda da izracunam?
[ SrdjanR271 @ 24.12.2010. 04:01 ] @
Probao sam NIntegrate[] bez konstanti, za a sam uzeo proizvoljno 7 i radi. Sa konstantama nece. Gde se taj integral koristi?
[ petarm @ 24.12.2010. 08:47 ] @
Izracunao sam ga. Da trebalo je izbaciti konstante. Uraditi smenu i OK je ispalo.