# User Portlet

Richard Frost
Discussions
I haven't used Dendrograms before, so I just started experimenting. If you look at Dendrogram[{1, 2, 4}] // FullForm, you can see that it's a Graphics object. That's not what I expected, since Graph and Tree and so forth keep an abstract...
For those interested in the details of this work, a portion of the Mathematica software I developed is available here: https://frostconcepts.org/LeastBridgesGraphs/ and the research project page is here: https://geneticdistance.org/
GraphLayout -> {"VertexLayout" -> "LayeredDigraphEmbedding", "PackingLayout" -> "ClosestPackingCenter"} yields ![enter image description here][1] [1]:...
It appears this is achieved with Dendrogram by specifying "Average" for ClusterDissimilarityFunction.
Here I used Inset to create callouts. The application is sequence coverage of gene locations in shotgun whole genome scans. Notice some chromosomes contain gaps, resulting in non-contiguous chromosome assembly. ![enter image description here][1] ...
According to the web page, this has a GenBank ascension ID of CM019739.1. This can be used with a WFR function to import the sequence. In[7]:= Short[ genome = ResourceFunction["ImportFASTA"]["CM019739.1"], 10] Out[7]//Short=...
Moderator Note: this post was highlighted on the Wolfram's official social media channels. Thank you for your contribution. We are looking forward to your future posts. - [Twitter][1] - [Facebook][2] [1]:...
I'm probably missing something, but should it not be: MahalanobisDistance[data_?MatrixQ,u_,v_]:= Sqrt[(u-v).Inverse[Covariance[data]].(u-v)] instead of MahalanobisDistance[data_?MatrixQ,u_,v_]:= Sqrt[u.Inverse[Covariance[data]].v] ...
&[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/3c1f6bca-4353-4ff8-a694-a0b494a1f8f1
Richard, I guess you basically have to define your function labspace in a way to prohibit evaluation of non-numeric arguments. Try: labspace[l_?NumericQ, a_?NumericQ, b_?NumericQ, i_, cs_] := ColorConvert[ColorConvert[LABColor[l, a,...