User Portlet
| Discussions |
|---|
| Perfect. ![enter image description here][1] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=5215FaintDendrogram.jpg&userId=1957361 |
| Hi Daniel, Thank you for the pointer to the resource function. I'll have a look and see if it is applicable to my digital SSR research of perennial plant whole chromatin DNA. |
| Hi Gianluca - good to hear from you. Thank you for the suggestion to use Graphics directly. I solved the problem by using Show: gPlot = Show[ ListLinePlot[ plotData[[;; , 1]], AxesOrigin -> {0., 0.}, ... |
| 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]:... |