https://community.wolfram.com RSS Feed for Wolfram Community showing any discussions tagged with Earth Science sorted by active. https://community.wolfram.com/groups/-/m/t/3641315 ![Ocean color calculus image integration NASA MODIS-aqua satellite part 2-α9.0][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=OceancolorcalculusimageintegrationNASAMODIS-aquasatellitepart2-%CE%B19.0.png&userId=20103 [2]: https://www.wolframcloud.com/obj/789fed36-a288-473b-8115-2cde1320d405 Dara Shayda 2026-02-18T05:41:22Z https://community.wolfram.com/groups/-/m/t/3444204 ![An introduction to Mathematica for civil and structural engineers][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Main15042025.png&userId=20103 [2]: https://www.wolframcloud.com/obj/9ddfc925-09b0-4d9d-be17-bdda845d689f Malcolm Woodruff 2025-04-14T07:10:19Z https://community.wolfram.com/groups/-/m/t/3642086 ![Using Mathematica for finite elements for engineers][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=UsingFiniteElementstoAnalyseStructuresinMathematica.png&userId=20103 [2]: https://www.wolframcloud.com/obj/62b222bc-f5df-49eb-a619-782ee5ac2cd5 Malcolm Woodruff 2026-02-20T09:39:17Z https://community.wolfram.com/groups/-/m/t/3641306 &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/9107500a-9183-4f26-92a2-507f8622e48b Dara Shayda 2026-02-18T05:38:50Z https://community.wolfram.com/groups/-/m/t/3642762 ![Modeling Ocean Plastics and Microplastic Bioaccumulation in Marine Food Webs][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=7196image.png&userId=911151 [2]: https://www.wolframcloud.com/obj/29d1e66c-401f-4cd2-baeb-77c298c257af Wolfram Education Programs 2026-02-20T18:45:33Z https://community.wolfram.com/groups/-/m/t/3636073 ![Ocean color calculus: NASA MODIS-aqua satellite image data][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=OceancolorcalculusNASAMODIS-aquasatelliteimagedata.png&userId=20103 [2]: https://www.wolframcloud.com/obj/a72add26-a14f-45ab-8ad7-e55c8dde009c Dara Shayda 2026-02-08T03:55:50Z https://community.wolfram.com/groups/-/m/t/3603965 [![Archaeoastronomy with Wolfram: 3D modeling of Neolithic circular ditches in Central Europe][1]][2] &[Wolfram Notebook][3] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=3801ArchaeoastronomywithWolfram3DmodelingofNeolithiccircularditchesinCentralEurope.png&userId=20103 [2]: https://community.wolfram.com//c/portal/getImageAttachment?filename=3801ArchaeoastronomywithWolfram3DmodelingofNeolithiccircularditchesinCentralEurope.png&userId=20103 [3]: https://www.wolframcloud.com/obj/6c3ea052-adb5-493d-8db1-790de5315729 Jessica Alfonsi 2026-01-09T18:02:28Z https://community.wolfram.com/groups/-/m/t/3595292 ![enter image description here][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=3Dmapofearthquakesin2025-small.gif&userId=20103 [2]: https://www.wolframcloud.com/obj/36119fbe-8a17-4796-9341-abcf13c1aaeb Jeffrey Bryant 2025-12-22T19:16:52Z https://community.wolfram.com/groups/-/m/t/3582661 ![Global map of ESA WorldCover Land Cover Classifications][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=landcover-post-banner.png&userId=2591433 [2]: https://www.wolframcloud.com/obj/d565c9cf-ba84-4bbd-9945-dac31933755f Phileas Dazeley-Gaist 2025-11-27T17:25:29Z https://community.wolfram.com/groups/-/m/t/859842 Yesterday I posted a little [piece of code to visualise the changing mean temperature of the earth][1]. The animation tried to point out "how the temperature spirals out of control". In order to account for positive and negative deviations from the "standard" temperature, we needed to use a transformation from temperature difference to radius. This was non-linear and one might argue that lower temperatures are underrepresented. Here is an alternative attempt. ![enter image description here][2] I do not post it in the same thread as the last post, because the gif is quite large and adding more the original thread might make it very slow to load. In spite of that I only have uploaded a lower quality video with every second frame. You can download the full quality file [from here][3]. Here's the implementation of the new idea, which I have seen in a similar fashion somewhere online: tempdata = Transpose[{Interpreter["Date"][#[[All, 1]]], #[[All, 2]]}] &@ Import["http://www.metoffice.gov.uk/hadobs/hadcrut4/data/current/time_series/HadCRUT.4.4.0.0.monthly_ns_avg.txt", "Data"]; frames2 = Table[ListLinePlot[#, PlotStyle -> Table[Opacity[0.7/(1 + Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]] - j)^2 + 0.3], {j, 1, Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]]}], PlotRange -> {{1, 12}, Evaluate[MinMax[tempdata[[All, 2]]] + {-0.1, 0.1}]}, Frame -> True, Background -> Black, FrameStyle -> Directive[White, Bold, 16], LabelStyle -> Directive[White, Bold, 16], ImageSize -> Large, ColorFunction -> (ColorData["Temperature"][2^(#2) - 0.5] &), ColorFunctionScaling -> False, FrameTicks -> {{True, None}, {Transpose@{Range[12], {"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"}}, None}}, FrameLabel -> {"Month", "\[CapitalDelta]T"}, ImagePadding -> 75, AspectRatio -> 1, Epilog -> {Text[Style[1849 + Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]], Red, 21], {2.5, 1.}]}] & @ Partition[tempdata[[All, 2]], UpTo[12]][[1 ;; Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]]]], {k, 1, Length[Partition[tempdata[[All, 2]], UpTo[12]]] + 10}]; You an list animate it: ListAnimate[frames2] I exported the frames: Monitor[Do[Export["~/Desktop/ClimateGraph/frame" <> ToString[1000 + k] <> ".jpg", frames2[[k]], ImageResolution -> 100], {k, 1, Length[frames2], 1}], k] and use the terminal command: convert -delay 15 -loop 0 frame*.jpg animatedfull.gif to create the animation above. If you prefer the curves a bit smoother you can use: frames3 = Table[ListLinePlot[#, PlotStyle -> Table[Opacity[0.7/(1 + Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]] - j)^2 + 0.3], {j, 1, Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]]}], PlotRange -> {{1, 12}, Evaluate[MinMax[tempdata[[All, 2]]] + {-0.1, 0.1}]}, InterpolationOrder->2, Frame -> True, Background -> Black, FrameStyle -> Directive[White, Bold, 16], LabelStyle -> Directive[White, Bold, 16], ImageSize -> Large, ColorFunction -> (ColorData["Temperature"][2^(#2) - 0.5] &), ColorFunctionScaling -> False, FrameTicks -> {{True, None}, {Transpose@{Range[12], {"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"}}, None}}, FrameLabel -> {"Month", "\[CapitalDelta]T"}, ImagePadding -> 75, AspectRatio -> 1, Epilog -> {Text[Style[1849 + Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]], Red, 21], {2.5, 1.}]}] & @ Partition[tempdata[[All, 2]], UpTo[12]][[1 ;; Min[k, Length[Partition[tempdata[[All, 2]], UpTo[12]]]]]], {k, 1, Length[Partition[tempdata[[All, 2]], UpTo[12]]] + 10}]; And proceed as before. The last frame looks like this: ![enter image description here][4] Cheers, Marco [1]: http://community.wolfram.com/groups/-/m/t/859046 [2]: http://community.wolfram.com//c/portal/getImageAttachment?filename=9057animated.gif&userId=48754 [3]: https://www.dropbox.com/s/g1xeppsy2wtucln/animatedfull.gif?dl=0 [4]: http://community.wolfram.com//c/portal/getImageAttachment?filename=ScreenShot2016-05-21at00.59.23.png&userId=48754 Marco Thiel 2016-05-21T00:12:16Z https://community.wolfram.com/groups/-/m/t/3554064 ![2024 was the warmest on record: Global Temperature Anomalies 1750-2024, land-surface air monthly °C][4] [![2024 was the warmest on record: Global Temperature Anomalies 1750-2024, land-surface air monthly °C][1]][2] &[Wolfram Notebook][3] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=v45sdfga.jpg&userId=11733 [2]: https://community.wolfram.com//c/portal/getImageAttachment?filename=v45sdfga.jpg&userId=11733 [3]: https://www.wolframcloud.com/obj/95a43d2f-e764-403c-9426-1b3e1814beef [4]: https://community.wolfram.com//c/portal/getImageAttachment?filename=glote-ezgif.com-optimize.gif&userId=11733 Vitaliy Kaurov 2025-10-02T06:54:18Z https://community.wolfram.com/groups/-/m/t/3234937 ![Earth's hottest day ever recorded - July 22, 2024 - analysed and visualized through climate data A plot of daily global surface air temperature by year from 1940-2024, and accompanying heatmap][1] &[Wolfram Notebook][2] [backup]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Hottestdayonearth-banner.png&userId=2591433 [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=6595_FILScreenshot2024-07-25at4.10.36%E2%80%AFPM.jpg&userId=11733 [2]: https://www.wolframcloud.com/obj/8eefb2b4-6f82-4da6-999f-3c60054be64e Phileas Dazeley-Gaist 2024-07-25T20:38:59Z https://community.wolfram.com/groups/-/m/t/2828058 ![enter image description here][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=PaleogeographicMaps.gif&userId=20103 [2]: https://www.wolframcloud.com/obj/5cd24f17-1b01-4dec-a917-b3d4ac97617b Jeffrey Bryant 2023-02-10T19:29:55Z https://community.wolfram.com/groups/-/m/t/3515431 This computational essay provides a suite of interactive tools for the formal analysis of the Spekkens Toy Model, a framework inspired by Quantum Information Theory that is foundational to our architecture. It serves as 'Code as Proof' for the principles of state evolution, visualizing how a set of reversible permutations acts on composite states (formed via Kronecker product) to create a traversable, multiway state-space graph. By exploring these state dynamics, we develop the mathematical intuition for the Token Dynamics, Reversible Subtransactions, and epistricted registers that allow our protocols to guarantee exactly-once semantics and escape the irreversible failures of conventional networking. &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/0cd01df7-b281-478f-aa7a-70f03119596a Dean Gladish 2025-07-19T07:31:36Z https://community.wolfram.com/groups/-/m/t/3500658 ![Chaotic mineral flow simulation for deposition analysis][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=projecctpic.jpeg&userId=3499727 [2]: https://www.wolframcloud.com/obj/8bc7b825-fca1-4bb7-a42b-5b4cfb7b78c0 Andreas Tsang 2025-07-10T19:26:01Z https://community.wolfram.com/groups/-/m/t/3498902 ![Vector field analysis of trash spread through oceans][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Screenshot2025-07-10at10.43.32%E2%80%AFAM.png&userId=3498354 [2]: https://www.wolframcloud.com/obj/40bab97a-65cd-49c7-9be8-ff4b543ee0bd Divya Thota 2025-07-10T14:48:43Z https://community.wolfram.com/groups/-/m/t/3502450 ![Visualizing orbital decay due to Earth's oblate shape][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Screenshot2025-07-10at5.28.11%E2%80%AFPM.png&userId=3500732 [2]: https://www.wolframcloud.com/obj/bba46b7e-4418-4806-abf2-b10d8b8594e9 Alex Ning 2025-07-10T21:33:29Z https://community.wolfram.com/groups/-/m/t/3503212 ![A visual representation of cloud seeding, where the blue molecules represent Cloud Condensation Nuclei attracting water molecules][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Screenshot2025-07-10at5.16.37%E2%80%AFPM.png&userId=3493403 [2]: https://www.wolframcloud.com/obj/000cbc2e-d168-471c-8489-81b07271772b Yuti Purohit 2025-07-10T22:12:48Z https://community.wolfram.com/groups/-/m/t/3473144 ![enter image description here][1] Early this August, Wolfram U will be hosting a [two-week online boot camp][2] that will teach you how to apply multiparadigm data science to a bevy of different fields. You'll learn about everything from data visualization to relational database connectivity and working with geographical data and maps from our very best instructors. If you don't know any Wolfram Language yet, not to worry: we will rapidly introduce you to that as well! By the end of this boot camp, you can earn [certification][3] for: - Program completion (by attending and actively participating in the sessions) - Level 1 proficiency in multiparadigm data science (by completing quizzes and graded exercises) - Level 2 applied expertise in multiparadigm data science (by completing a project which can include your own data) In addition to the daily lectures, this boot camp also includes daily office hours and frequent opportunities to complete hands-on explorations. You can log into your free Wolfram account and register for this boot camp at two different levels below: > - [**Full Registration**][4] > - [**Guest Pass**][5] We hope that we'll see you there. ![enter image description here][6] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=ScreenShot_2025-06-0217.33.11.png&userId=1711324 [2]: https://www.wolfram.com/wolfram-u/boot-camp-data-science/ [3]: https://www.wolfram.com/wolfram-u/certifications/ [4]: https://www.wolfram.com/wolfram-u/registration/?id=143461&lang= [5]: https://www.wolfram.com/wolfram-u/registration/?id=143463&lang= [6]: https://community.wolfram.com//c/portal/getImageAttachment?filename=ScreenShot_2025-06-0217.52.41.png&userId=1711324 Arben Kalziqi 2025-06-02T23:22:52Z https://community.wolfram.com/groups/-/m/t/3459652 ![Campi Flegrei (Phlegraean Fields): an active volcanic caldera west of Naples and Mount Vesuvius][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Video-2025-05-02T13-42-16-ezgif.com-optimize.gif&userId=11733 [2]: https://www.wolframcloud.com/obj/19611b07-a6f4-43e8-8051-938a1154a80d Jeffrey Bryant 2025-05-13T06:56:35Z