Reiseplanung: Neu in Wolfram Language 11

Reiseplanung

Die durchschnittliche Geschwindigkeit von Autos unterwegs von Indianapolis, Indiana, nach Chicago, Illinois, wird durch eine TriangularDistribution beschrieben.

In[1]:=

speed\[ScriptCapitalD] = TriangularDistribution[{\!\(\*
NamespaceBox["LinguisticAssistant",
DynamicModuleBox[{Typeset`query$$ = "55 mi/h", Typeset`boxes$$ = 
       TemplateBox[{"55", 
RowBox[{"\"mi\"", " ", "\"/\"", " ", "\"h\""}], "miles per hour", 
FractionBox["\"Miles\"", "\"Hours\""]}, "Quantity", 
        SyntaxForm -> Mod], Typeset`allassumptions$$ = {}, 
       Typeset`assumptions$$ = {}, Typeset`open$$ = {1, 2}, 
       Typeset`querystate$$ = {
       "Online" -> True, "Allowed" -> True, 
        "mparse.jsp" -> 3.9373779`8.046752092819743, 
        "Messages" -> {}}}, 
DynamicBox[ToBoxes[
AlphaIntegration`LinguisticAssistantBoxes["45", 4, Automatic, 
Dynamic[Typeset`query$$], 
Dynamic[Typeset`boxes$$], 
Dynamic[Typeset`allassumptions$$], 
Dynamic[Typeset`assumptions$$], 
Dynamic[Typeset`open$$], 
Dynamic[Typeset`querystate$$]], StandardForm],
ImageSizeCache->{94., {8., 16.}},
TrackedSymbols:>{
         Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, 
          Typeset`assumptions$$, Typeset`open$$, 
          Typeset`querystate$$}],
DynamicModuleValues:>{},
UndoTrackedVariables:>{Typeset`open$$}],
BaseStyle->{"Deploy"},
DeleteWithContents->True,
Editable->False,
SelectWithContents->True]\), \!\(\*
NamespaceBox["LinguisticAssistant",
DynamicModuleBox[{Typeset`query$$ = "82 mph", Typeset`boxes$$ = 
       TemplateBox[{"82", 
RowBox[{"\"mi\"", " ", "\"/\"", " ", "\"h\""}], "miles per hour", 
FractionBox["\"Miles\"", "\"Hours\""]}, "Quantity", 
        SyntaxForm -> Mod], Typeset`allassumptions$$ = {}, 
       Typeset`assumptions$$ = {}, Typeset`open$$ = {1, 2}, 
       Typeset`querystate$$ = {
       "Online" -> True, "Allowed" -> True, 
        "mparse.jsp" -> 0.2656176`6.875801841788495, 
        "Messages" -> {}}}, 
DynamicBox[ToBoxes[
AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, 
Dynamic[Typeset`query$$], 
Dynamic[Typeset`boxes$$], 
Dynamic[Typeset`allassumptions$$], 
Dynamic[Typeset`assumptions$$], 
Dynamic[Typeset`open$$], 
Dynamic[Typeset`querystate$$]], StandardForm],
ImageSizeCache->{94., {8., 16.}},
TrackedSymbols:>{
         Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, 
          Typeset`assumptions$$, Typeset`open$$, 
          Typeset`querystate$$}],
DynamicModuleValues:>{},
UndoTrackedVariables:>{Typeset`open$$}],
BaseStyle->{"Deploy"},
DeleteWithContents->True,
Editable->False,
SelectWithContents->True]\)}, \!\(\*
NamespaceBox["LinguisticAssistant",
DynamicModuleBox[{Typeset`query$$ = "72 mph", Typeset`boxes$$ = 
      TemplateBox[{"72", 
RowBox[{"\"mi\"", " ", "\"/\"", " ", "\"h\""}], "miles per hour", 
FractionBox["\"Miles\"", "\"Hours\""]}, "Quantity", 
       SyntaxForm -> Mod], Typeset`allassumptions$$ = {}, 
      Typeset`assumptions$$ = {}, Typeset`open$$ = {1, 2}, 
      Typeset`querystate$$ = {
      "Online" -> True, "Allowed" -> True, 
       "mparse.jsp" -> 0.250013`6.8495075848939235, 
       "Messages" -> {}}}, 
DynamicBox[ToBoxes[
AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, 
Dynamic[Typeset`query$$], 
Dynamic[Typeset`boxes$$], 
Dynamic[Typeset`allassumptions$$], 
Dynamic[Typeset`assumptions$$], 
Dynamic[Typeset`open$$], 
Dynamic[Typeset`querystate$$]], StandardForm],
ImageSizeCache->{94., {8., 16.}},
TrackedSymbols:>{
        Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, 
         Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}],
DynamicModuleValues:>{},
UndoTrackedVariables:>{Typeset`open$$}],
BaseStyle->{"Deploy"},
DeleteWithContents->True,
Editable->False,
SelectWithContents->True]\)]

Out[1]=

Die Wahrscheinlichkeitsdichtefunktion der Geschwindigkeitsverteilung.

In[2]:=

Plot[PDF[speed\[ScriptCapitalD], Quantity[x, "mph"]], {x, 50, 85}]

Out[2]=

Berechnen Sie die Distanz der Autofahrt zwsichen den Städten.

Den kompletten Wolfram Language-Input zeigen

In[3]:=

GeoGraphics[
 Style[Line[
   TravelDirections[{Entity[
      "City", {"Indianapolis", "Indiana", "UnitedStates"}], 
     Entity["City", {"Chicago", "Illinois", "UnitedStates"}]}]], 
  Thick, Red], GeoBackground -> GeoStyling["StreetMap"], 
 GeoRange -> Quantity[100, "Miles"]]

Out[3]=

In[4]:=

distance = 
 TravelDistance[{Entity[
    "City", {"Indianapolis", "Indiana", "UnitedStates"}], 
   Entity["City", {"Chicago", "Illinois", "UnitedStates"}]}, 
  TravelMethod -> "Driving"]

Out[4]=

Ermitteln die erwartete Ankunftszeit.

In[5]:=

Expectation[distance/v, v \[Distributed] speed\[ScriptCapitalD]]

Out[5]=

Konvertieren Sie diese in Stunden und Minuten.

In[6]:=

Expectation[distance/v, v \[Distributed] speed\[ScriptCapitalD]];
UnitConvert[%, MixedUnit[{"Hours", "Minutes"}]]

Out[6]=

Unter der Annahme, dass der Benzinverbrauch als eine Funktion der Autogeschwindigkeit durch folgende Interpolationsfunktion gegeben ist, kann die erwartete Benzinmenge für den Trip mithilfe von NExpectation berechnet werden.

In[7]:=

mpg = Interpolation[{Quantity[{40, 50, 60, 70, 80}, "miles per hour"],
      Quantity[{33, 32, 28, 25, 20}, "miles per gallon"]} // 
    Transpose, InterpolationOrder -> 1];

In[8]:=

NExpectation[distance/mpg[v], v \[Distributed] speed\[ScriptCapitalD]]

Out[8]=

Wolfram Language™

Reiseplanung

Verwandte Beispiele