DOWNLOAD-DESKTOP-NOTEBOOK.nb (514 KB)
7 Likes
– 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!
1 Like
Thank you, for the recognition!
1 Like
Great work, @Anton, thank you! I was immediately thinking if it is possible to make a video visualization of this getting all data together present in that video. Then video can be shared across many platforms. This is a Data-Viz style of time-narrative where text commentary is unfolding as scanning line runs through your plot. Plus some nice clock added – I really loved the orange one. I sketched the outline below. Summaries fitting the box can be done I think with LLMSynthesize. People can pause the video at any moment to have time to read the text.
Video can be easily generated with contracts like:
Parallelize@AnimationVideo
Parallelize@FrameListVideo
Would be nice to have such video made – editorial team would embed it in the post.
2 Likes
Thank you!
I have to think over the video idea…
I was very impressed by the tune-ability of ClockGauge, so, I programmed a similar gauge in Raku-JavaScript (via D3.js):
2 Likes
One possible application of the code in this notebook is to make a “web service“ that gives clock images with Doomsday Clock readings. For example, click on this button:
Out[]= [Button]
The notebook behind the button, (https://www.wolframcloud.com/obj/e28834c9-42a4-4991-9889-243fa39a795d) is not for public access. got an error message 403 Sorry, you do not have permission to access this item.
2 Likes
Thank you! Should be fixed now.
Here are the Raku counterparts of this Wolfram Language (WL) post:
I started the Raku post first, but, well, I finished and posted it after the WL one.
I was very impressed by the “completeness” of WL’s ClockGauge. So, I decided to program a clock gauges making function via Raku-JavaScript. (Instead of using Google Charts Gauge, which does not look that much like a clock…)
See JavaScript examples here:
1 Like
As of yesterday, 2024-01-28, the Doomsday clock is set at 89 seconds to midnight.
url = "https://thebulletin.org/doomsday-clock/timeline/";
txtEN = Import[url, "Plaintext"];
TextStats[txtEN]
# <|"Characters" -> 79391, "Words" -> 12004, "Lines" -> 1145|>
startPhrase = "A clock";
sentence = Select[Map[StringTrim, StringSplit[txtEN, "\\n"]], StringStartsQ[#, startPhrase]&]//First
# A clock reading 89 seconds to midnight"
aDoomReading = Association@Cases[Flatten[pTOP[ToTokens@sentence]], _Rule]
# <|"Seconds" -> 89|>
DoomsdayClockGauge[aDoomReading, PlotTheme -> "Marketing"]
1 Like