Tag Info

New answers tagged

1

In Mathematica, however, the search is simple, for instance: GraphData[{"Bicubic", "Asymmetric", "Planar"}] (* {{"Cubic", {24, 3}}, {"Cubic", {54, 1}}, {"CubicPolyhedral", 9}, {"CubicPolyhedral", 18}, {"CubicPolyhedral", 42}, {"CubicPolyhedral", 50}, "GreatRhombicosidodecahedralGraph", \ "GreatRhombicuboctahedralGraph", {"Prism", 6}, {"Prism", ...


0

{WolframAlpha["Expand Cos[4 x]", {{"Result", 1}, "Output"}], WolframAlpha["Expand Cos[4 x]", {{"Result", 2}, "Output"}]} yields {HoldComplete[Cos[x]^4 - 6 Cos[x]^2 Sin[x]^2 + Sin[x]^4], HoldComplete[2 Sin[[Pi]/4 - 2 x] Sin[[Pi]/4 + 2 x]]} Is this what you're seeking?


3

I am not sure why you do not want to use DSolve but it works perfectly in your case. f[t_] := Piecewise[ {{t^2 , 0 <= t < 1}, { 1, t > 1}}] DSolve[ {y''[t] - y[t] == f[t] , y[0] == 0, y'[0] == 0 }, y[t], t] gives correct solution of your equation. If you insist using Laplace transform in this problem, this can be done as follows, lap = ...



Top 50 recent answers are included