Skip to content

Reproducing Figure7 from Avino et al paper + grouping the cophylogeny analysis as high or low #146

@Jigyasa3

Description

@Jigyasa3

Dear @ArtPoon lab

Thank you so much for such an amazing R package and a great paper (https://onlinelibrary.wiley.com/doi/full/10.1002/ece3.5185).
I have a few questions regarding the paper-
a) I am trying to reproduce Figure7 in the paper, but I cannot seem to load the "groups" variable to the ggbiplot function.

g <- ggbiplot(p, groups=temp$Group, labels=rownames(temp), labels.size=3, var.col=rgb(0,0,0,0.4)) g <- g + scale_color_manual(name="Group", values=c('firebrick', 'cadetblue')) g <- g + theme(legend.position='none') print(g) ##where is the "Group" column?

b) I am interested in performing a similar analysis on my dataset and was wondering (i) for normalizing the different distance methods, why was the following normalize function used?
normalize <- function(x) { (x-min(x)) / (max(x)-min(x)) }

c) Is the data ("https://github.com/PoonLab/cophylo/edit/master/data/TotalandKernelS1.csv") in Figure 7, raw data? (i.e. generated by running each pair of host-symbiont tree in Kaphi and then normalized in the above-mentioned function)

d) How were "high" and "low" cophylogeny determined for each dataset in the paper? Is there a specific cut-off, or a relative value after normalization?

Looking forward to your reply!

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions