Frühere | Chronologischer Index | Spätere | ||
Vorherige | Thematischer Index | Nächste |
Guten Abend Oliver, als vierte Möglichkeit könnten Sie In[65]:= Remove[g]; g[x_] := Max[-4*5*x + 5, 4*5*x - 3*5];In[87]:= res2 = TrigReduce[(2*Integrate[g[t]*Cos[(k*2*o*t)/T], {t, 0, 1}, Assumptions -> {Mod[k, 2] == 0, Im[(k*o)/T] == 0}])/T]
Out[87]= (5*(2*T - 4*T*Cos[(k*o)/T] + 2*T*Cos[(2*k*o)/T] + k*o*Sin[(2*k*o)/T]))/(k^2*o^2)
eintippen. Gruss Udo.
Frühere | Chronologischer Index | Spätere | ||
Vorherige | Thematischer Index | Nächste |
DMUG-Archiv, http://www.mathematica.ch/archiv.html