User Portlet User Portlet

Discussions
Is there an UPGMA (perhaps with WPGMA) implementation for Mathematica? If not, perhaps someone can recommend an implementation that runs on Windows 10+ ? Thank you.
Do Callouts work in Graphics? If so, how would I have the values of **centers** appear below the ellipses in this example? centers = {0, 28.7, 33.8, 48.0, 55.4, 71.9}; Graphics[ Join[ ({Black, Circle[{#, 0}, {0.1, 0.4}]} & /@...
I'm interested in importing and navigating in Mathematica v12.2 desktop a recent GenBank whole genome of Ficus carica cultivar Dottato: https://www.ncbi.nlm.nih.gov/genome/53047?genome_assembly_id=749845 I've come up empty handed in the...
I have numerical data for 3D surfaces that I wish to mutually crop; i.e. crop the front and back with the left, right, top, and bottom - and similarly for the other 2 permutations. Afterwards, I will join these to make the surface of a volume. And...
labspace[l_, a_, b_, i_, cs_] := Block[{}, (List @@ ColorConvert[ColorConvert[LABColor[{l, a, b}], cs], "LAB"])[[i]]]; lmindata = NMinimize[{labspace[l, a, b, 1, "HSB"], (-1 3,...
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/4b0c3998-410c-4f3e-bd40-9da51a1a8215
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/61a1e392-971a-4639-a6f3-6811d97812e0
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/dabfa625-b424-4877-b305-b17125015a22
Are there other ways to Do something once without additional overhead? Here's a short example, but I have instances with dozens of lines of code. If[overwriteBrightBandsPlot, Do[ Export[brightBandsPlotPNGfile, LPXH2]; ...
For ChromaticityPlot3D, I'd like to specify an initial rotation (or alternately, a different coordinate order). Here is what is generated by default: Print[ ChromaticityPlot3D[ "RGB", "RGB", Appearance ->...