私たちは通常このように行うことを知っています:
x=c(rep(0.3,100),rep(0.5,700))
plot(table(x))
ただし、グラフには数個の点または垂直線しか表示されません。
0.3より上に100ドット、0.5より上に700ドットが必要な場合はどうすればよいですか?
このようなもの?
x <- c(rep(.3,100), rep(.5, 700))
y <- c(seq(0,1, length.out=100), seq(0,1,length.out=700))
plot(x,y)
編集: (OPのコメントに続いて)
その場合、このようなものが機能するはずです。
x <- rep(seq(1, 10)/10, seq(100, 1000, by=100))
x.t <- as.matrix(table(x))
y <- unlist(apply(x.t, 1, function(x) seq(1,x)))
plot(x,y)
linetype
あなたはと設定で横たわることができlinewidth
ます...
plot(table(x),lty=3,lwd=0.5)
小さい数(カウント)の場合は、次のように使用できstripchart
ますmethod="stack"
。
stripchart(c(rep(0.3,10),rep(0.5,70)), pch=19, method="stack", ylim=c(0,100))
ただし、ストリップチャートは700ドットでは機能しません。
編集:
dots()
パッケージTeachingDemosの関数は、おそらく必要なものです。
require(TeachingDemos)
dots(x)