0

ggplot2 を使用していくつかのチャートを印刷および保存する機能があります。geom_density を実行すると、エラー メッセージが表示されました。

Don't know how to automatically pick scale for object of type function. Defaulting to continuous
Error in data.frame(x = 1:5, y = c(44.43, 72.36, 177.17, 515.09, 1403.33 : 
arguments imply differing number of rows: 5, 0

いくつかの調査の後、グループ名といくつかの指示を見逃している可能性があることがわかりました。しかし、このエラーを特定することはできません。全データを掲載しました。

library(ggplot2)
dt <- read.table("/R/10G.csv", header=TRUE, sep="\t", na.strings="NA", dec=".", strip.white=TRUE)
dt$Thread <- factor(dt$Thread)  # factorize 'Thread'
library(plyr)
dd.mean <- ddply(dt, 'Thread', summarize, TPS = round(mean(TPS), 2), RT = round(mean(RT), 2))
m <- ggplot(dd.mean, aes(x=Thread,y=RT, group=seq)) 
m + geom_density(fill=NA)
m + geom_text(data=dd.mean, aes(x=Thread, label=TPS), vjust=-2)
4

1 に答える 1

1

ggplot()、具体的には とをもっと研究する必要がgeom_lineありgeom_pointます。geom_densityあなたがここで探していたものではないと思います。以下は、このタスクにアプローチできる 1 つの方法の例ですが、文字通り何千もの異なるアプローチがあります。そのため、ドキュメントをさらに調べることをお勧めします。役立つリンクがいくつかあります。

注：因数分解はしていませんdt$Thread

library(plyr)

dd.mean <- ddply(dt, 'Thread', summarize, TPS = round(mean(TPS), 2), RT = round(mean(RT), 2))

ggplot(dd.mean, aes(x = Thread, y = RT)) + 
        geom_line(size = 1, alpha = 0.3, colour = "red") + 
        geom_point(size = 3, alpha = 1, colour = "red") +  
        geom_text(x = dd.mean$Thread, label = dd.mean$TPS, vjust = -2)
于 2013-08-30T17:43:23.870 に答える