Group Abstract

Message Boards

WOLFRAM COMMUNITY

12.1K Views

6 Replies

19 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Automatically-generated timelines

Jesse Friedman

Jesse Friedman, Wolfram Research

Posted 10 years ago

Inspired by the recent Wolfram Blog post, I created a program that automatically generates timelines based on mentions of notable events in Wikipedia articles. Try it out below: generateAutoTimeline[text_String] := Block[{yearsentences}, yearsentences = Select[TextSentences[text], StringMatchQ[#, RegularExpression[".?(?:I\|i)n (\\d{4}).?\\."]] &]; TimelinePlot[ Tooltip[DateObject[{ToExpression@ StringCases[#, RegularExpression["\\d{4}"]][[1]]}], #] & /@ yearsentences]] generateAutoTimeline[WikipediaData["Natural language processing"]]

enter image description here

Inspired by the recent Wolfram Blog post, I created a program that automatically generates timelines based on mentions of notable events in Wikipedia articles. Try it out below:

generateAutoTimeline[text_String] := 
 Block[{yearsentences}, 
  yearsentences = 
   Select[TextSentences[text], 
    StringMatchQ[#, 
      RegularExpression[".*?(?:I|i)n (\\d{4}).*?\\."]] &]; 
  TimelinePlot[
   Tooltip[DateObject[{ToExpression@
         StringCases[#, RegularExpression["\\d{4}"]][[1]]}], #] & /@ 
    yearsentences]]

generateAutoTimeline[WikipediaData["Natural language processing"]]

Timeline of notable events in natural language processing

POSTED BY: Jesse Friedman

6 Replies

Sort By:

Vitaliy Kaurov

Vitaliy Kaurov, WOLFRAM Research

Posted 2 years ago

I just recently used this again, such a useful function! I needed to scan a long historic Wikipedia article and focus on dates only. This did all job for me, worked like a charm. Two minor suggestions: to inherit options of `TimelinePlot`, something like `PlotLayout -> "Vertical"` would work; to add to Wolfram Function Repository :-) Thanks, Jesse, this idea already saved me a lot of time.

POSTED BY: Vitaliy Kaurov

EDITORIAL BOARD

EDITORIAL BOARD, WOLFRAM

Posted 2 years ago

-- you have earned *Featured Contributor Badge* Your exceptional post has been selected for our editorial column *Staff Picks* http://wolfr.am/StaffPicks and Your Profile is now distinguished by a *Featured Contributor Badge* and is displayed on the Featured Contributor Board. Thank you!

POSTED BY: EDITORIAL BOARD

Christopher Carlson

Christopher Carlson, Wolfram Research

Posted 10 years ago

Very cool idea! And it works for topics you might not expect it to be useful for:

POSTED BY: Christopher Carlson

Sam Carrettie

Sam Carrettie, Freelancer

Posted 10 years ago

This is very neat idea Jesse. Do you mean that Select[TextSentences[nlp], StringMatchQ[#, RegularExpression[".?(?:I\|i)n (\\d{4}).?\\."]] &] is more robust in finding sentences with year dates then given in blog method TextCases[nlp, Containing["Sentence", "Number"]] I am not that familiar with regex. Could you explain briefly how to read RegularExpression[".?(?:I\|i)n (\\d{4}).?\\."]