ストリップチャートはRでこれと同様のストリップチャートをしようと時間をかけて

Question

の存在/不在を使用して：ここ

は、任意の日のために、それは個人があったかどうかを与えるいくつかの例のデータ（DF）、あります現在（1）または不在（0）。

Day ID1 ID2 ID3 
1 1 1 0 
2 0 1 1 
3 0 0 0 
4 1 1 1 
5 1 1 1 

私が試してみました：ナンセンス

を与える

stripchart(df) 

も試してみました：

よりよいがあるように私は感じてエラーに

を与える

stripchart(df ~ rownames(df) 

をダーをフォーマットする方法これのためのtaしかし私は方法を知らない！

ご協力いただきありがとうございます。

Answer 1

私はデータ（DF）の形であることが必要

）（ggplotを使用して、同様の何かをした誰かからいくつかのコードを取得するために管理：

Date  ID Name 
2016-08-11 1 Ray1 
2016-08-12 2 Ray2 
2016-08-12 3 Ray3 
... etc 

日付（または日付時刻と）個人が存在した、個別のID番号と、個々の名前（あなたが軸ではなく、ID番号の名前）を持つようにしたい場合は

日はPOSIXct形式であることが必要

コード（この答えの例のデータのわずか3行のために）次のとおりです

plot<-ggplot()+ geom_point(data=df, aes(df$Date, y=ID,colour = Name),shape = 19, size = 2)+ scale_y_continuous(breaks=1:3, labels=c("Ray1", "Ray2", "Ray3"))+ scale_x_datetime(date_minor_breaks = "day")+ xlab("Date") + ylab(NULL)+ theme(legend.position="none")+scale_colour_manual(values = c("black", "black"), name = "Ray",breaks = c("Ray1", "Ray2", "Ray3") + theme(legend.position="none")) 

：

scale_y_continuous(breaks=1:3, labels=c("Ray1", "Ray2", "Ray3")) 

は3人の中に休憩にy軸を与え、自分でそれらをラベル名前

scale_x_datetime(date_minor_breaks = "day") 

は、毎日の休憩

scale_colour_manual(values = c("black", "black"), name = "Ray",breaks = c("Ray1", "Ray2", "Ray3") + theme(legend.position="none") 

0123にx軸を与えます

色は黒色ですが、それ以外の場合は何らかの理由で虹になります。見た目は涼しい：P

申し訳ありませんが私は説明したが、私は何をしていたか分からなかったので、私は彼らが何をやっているのか分からない他の誰かを助けることができると思います！

誰かがストリップチャートでこのスタイルのグラフを作成する方法について他に提案がある場合は、私はまだ知りたいと思います！

Answer 2

ここでは、tidyrを使用してデータを再構成し、次にlatticeを使用して条件付きストリップスロットをプロットする方法を示します。

dd_long <- tidyr::gather(df, id, present, -Day) 
dd_long$present <- factor(dd_long$present, labels = c("Not present", "Present")) 

lattice::stripplot(present ~ Day | id, data = dd_long, layout = c(3, 1))