날짜 객체 시각화: Wolfram Language 11의 신기능

날짜 객체 시각화

TimelinePlot을 사용하여 시간의 경과를 라벨로 시각화합니다. 노벨 물리학상 수상자 목록을 표시합니다.

In[1]:=

people = {Entity["Person", "AlbertEinstein::6tb7g"], 
   Entity["Person", "RichardFeynman::qdvj4"], 
   Entity["Person", "MarieCurie::v9f84"], 
   Entity["Person", "MaxPlanck::73z39"], 
   Entity["Person", "NielsBohr::8snv9"], 
   Entity["Person", "EnricoFermi::9k57b"]};

In[2]:=

lifespan = EntityValue[people, {"BirthDate", "DeathDate"}]

Out[2]=

In[3]:=

TimelinePlot[Thread[Labeled[Interval /@ lifespan, people]]]

Out[3]=

DateObject 식과 시간 간격을 혼합합니다.

전체 Wolfram 언어 입력 표시하기

In[4]:=

TimelinePlot[{{DateObject[{1921}], 
   Labeled[Interval[{DateObject[{1879, 3, 14}], 
      DateObject[{1955, 4, 18}]}], 
    Entity["Person", "AlbertEinstein::6tb7g"], 
    After]}, {DateObject[{1965}], 
   Labeled[Interval[{DateObject[{1918, 5, 11}], 
      DateObject[{1988, 2, 15}]}], 
    Entity["Person", "RichardFeynman::qdvj4"], 
    After]}, {DateObject[{1903}], 
   Labeled[Interval[{DateObject[{1867, 11, 7}], 
      DateObject[{1934, 7, 4}]}], 
    Entity["Person", "MarieCurie::v9f84"], 
    After]}, {DateObject[{1918}], 
   Labeled[Interval[{DateObject[{1858, 4, 23}], 
      DateObject[{1947, 10, 4}]}], 
    Entity["Person", "MaxPlanck::73z39"], 
    After]}, {DateObject[{1922}], 
   Labeled[Interval[{DateObject[{1885, 10, 7}], 
      DateObject[{1962, 11, 18}]}], 
    Entity["Person", "NielsBohr::8snv9"], 
    After]}, {DateObject[{1938}], 
   Labeled[Interval[{DateObject[{1901, 9, 29}], 
      DateObject[{1954, 11, 28}]}], 
    Entity["Person", "EnricoFermi::9k57b"], After]}}, 
 PlotLayout -> "Overlapped", PlotTheme -> "Web", 
 PlotLegends -> 
  Placed[PointLegend[{Black}, {"Year Awarded Nobel Prize"}, 
    LegendMarkerSize -> 15], Above]]

Out[4]=

Wolfram 언어™

날짜 객체 시각화

관련 예제