私は、複数のクラス(この例では3クラス)のデータを持っていますが、遺伝子型、早期表現型および後期表現型ステージの3つの時点に基づいてクラスが異なります。ここで3つのカラムを持つトランジションプロットの作成
はサンプルデータです:
genotype<-cbind(c(rep("A",100),rep("B",100),rep("C",100)))
early_phenotype<-cbind(c(rep("A",75),rep("B",75),rep("C",75),rep("A",75)))
late_phenotype<-cbind(c(rep("A",50),rep("B",100),rep("C",100),rep("A",50)))
df<-cbind(genotype,early_phenotype,late_phenotype)
df<-as.data.frame(df)
colnames(df)<-c("genotype","early_phenotype","late_phenotype")
私は一般的に「移行プロット」と呼ばれるものを生成したいと思います。私が得ている最も近いがこれです:
library(Gmisc)
transitionPlot(table(df[,1:2]), txt_start_clr = "black", txt_end_clr = "black", fill_start_box = "white", fill_end_box = "white")
をしかし、私はこのプロットは持っていないという二つのことを達成しようとしています:
- を
私は3つ以上の列、この例では3つの列:遺伝子型、早期表現型、および後期表現型を必要とします。この例では、(私はないRに、Photoshopでこれを達成し) 代わりに2つのボックスを接続異なる重みを有する単一の矢印の
、私はむしろジッタ/透明性を有する複数の矢印を有するであろう。このようになります。各矢印は、個々の観測を表すことになり、そしてこのようなものと思われる場所:
任意の提案を?
P.S.私は本当にボックスのカーブしたエッジや派手なシャドウについては気にしません。
[Gmisc :: Transition-class](https://cran.r-project.org/web/packages/Gmisc/vignettes/Transition-class.html) –