0

ggplot2 を使用してドット プロットを作成しています。私のデータは基本的に x_axis、y_axis、z_axis の 3 つの列の形式であり、x_axis と y_axis はペアを表し、z_axis はペアの数を表します。

したがって、x_axis と y_axis をプロットし、z_axis を使用してドットに色を付けています。たとえば、特定のカウントのプロットをスキップしたい特定の状況があります: 1 のカウントが複数回発生し、1 のプロットをスキップしたい場合もありますが、凡例には 1 が表示されます。以下は私のコードです:

    > new<-read.table("PB1_combo.txt", header=T, sep="\t")
    > bp <-ggplot(data=new, aes(x_axis,y_axis, colour=factor(z_axis)), size=z_axis) +                                 
    geom_point(size=5)
    > bp + ggtitle("PB1-PB1")
    > last_plot()+ scale_colour_discrete(name="Counts")
    > last_plot()+ theme_bw()


  Sample data from PB1_combo.txt
  x_axis  y_axis  z_axis
    14      576     2
    394     652     2
    759     762     2
    473     762     2
    65      763     3
    114     390     2
    762     763     4
    758     762     2
    388     616     2
    217     750     2
    65      762     2
    473     763     2
    743     759     2
    65      213     2
    743     762     2
4

1 に答える 1

1

まず、 factor を作成する必要がありますz_axis。そうすれば、すべての可能な値が存在しない場合でも、R はそれらを認識することができます。

new$Count <- factor(new$z_axis)

（ちなみに、実際には別の名前を選択する必要がありますnew。）

drop=FALSEただし、次の呼び出しで使用して、データをサブセット化し、不足しているレベルを凡例に表示できますscale_color_discrete。

ggplot(data=new[new$Count!="2", ], aes(x_axis,y_axis, colour=Count), size=z_axis) +                                 
  geom_point(size=5) +
  ggtitle("PB1-PB1") +
  scale_colour_discrete(name="Counts", drop=FALSE) +
  theme_bw()

ここに画像の説明を入力

実際、この質問を参照してください。

于 2013-08-16T20:13:29.687 に答える