アルファプロットを作成しようとしましたが、正しい方法が見つかりませんでした。私は理解するためにさまざまな組み合わせを試して、私はほとんどそこにいたが、私は少し助けが必要です。
私の質問は、どのように私はプロットで青い色を取り除くことができますです。ggplotスケールアルファ連続塗りつぶしの色
私のスクリプトは、このスクリプトは、このプロット
を作成し、私は活性化 "ガイド(FALSE =記入)+" と青の伝説をオフに取り除くことができるようにすることができます `
p <- ggplot(df, aes(x=x, y=y))
p + geom_hex(aes(alpha=..count..),bins=20)+
scale_x_log10("ratio following/followers",
labels = trans_format("log10", math_format(10^.x))) +
scale_y_log10("ratio messages received/sent",
labels = trans_format("log10", math_format(10^.x))) +
theme_bw() +
theme(panel.background = element_blank(),
panel.grid.major = element_blank(), panel.grid.minor=element_blank(),
plot.background = element_blank())+
#guides(fill=FALSE)+
scale_alpha_continuous ("Counts",breaks=c(0,2000,4000,6000,8000,10000))+
geom_vline(xintercept =1, color="red", size=0.25, linetype=5)+
geom_hline(yintercept =1, color="red", size=0.25, linetype=5) +
annotate('text', x=500, y=0.01, size=3, label="4\ncommon\nusers") +
annotate('text', x=0.0001, y=0.01, size=3, label="3\nbroadcasters") +
annotate('text', x=0.0001, y=7000, size=3, label="1\ninfluentials") +
annotate('text', x=500, y=7000, size=3, label="2\nhidden\ninfluentials")
ですスクリプトでは次のようになります。
You can reach sample data from here
お返事ありがとう@Didzis Elferts。私は伝説とプロットがカラーを壊すことは確かではありませんでした。あなたが見ることができるように、これらの写真10Kと8Kは同じ色(私は右です!)ですので、10Kは暗くなければなりません。
あなたが別のデータを使用しているようです。そうであれば、実際のデータに応じて最大のアルファ値が割り当てられます。 –
この場合、データをマージする必要がありますか、プロットで修正する方法があります。 – eabanoz
最も簡単な方法は、データをマージし、ファセットを使用してそれらをプロットすることです。次に、あなたは両方のグループのために一つの凡例を持っています –