0

X 軸が年、Y 軸がコストの 2x2 グリッド レイアウトでグラフを配置しようとしています。個々のグラフごとにフォーマットすると、つまりドル記号が表示されますが、グリッド レイアウトに配置すると、ドル記号とカンマが消えます。

以下のコード:

rat<-qplot(tallc$Group.1,COSTS,data=tallc, geom=c("point","smooth"), 
method="lm",
           xlab= "YEAR",
           ylab= "COST",
           scale_x_continuous(limits = c(1999,2012)),
           main= "Total Costs from 1999 to 2012")      
rat1 <- rat+scale_x_continuous(breaks=c(1999,2000,2001,2002,2003,2004,2005,2006,
           2007,2008,2009,2010,2011,2012))
rat1 + scale_y_continuous(labels=dollar)

使った瞬間

pushViewport(viewport(layout = grid.layout(2, 2)))
print(a, vp = viewport(layout.pos.row = 1, layout.pos.col = 1))
print(b, vp = viewport(layout.pos.row = 1, layout.pos.col = 2))
print(c, vp = viewport(layout.pos.row = 2, layout.pos.col = 1))
print(rat1, vp = viewport(layout.pos.row = 2, layout.pos.col = 2))

ドル記号が消えます。

4

1 に答える 1

0

以下にいくつかの欠落項目 (およびその答え) を示します。

 tallc<-data.frame(COSTS=rnorm(9), Group=1999:2007)  # fake data
 require(ggplot2) # obvious
 require(scales) # not so obvious
 # first part of code
 ##### The missing step:
 rat1 <- rat1 + scale_y_continuous(labels=dollar)
 require(grid)
 # Second part: grid code
 # success with plotting dollar-scale in lower right corner
 # (despite errors from the missing a,b, and c objects.)

scale_y_continuous「ドル記号」を追加した結果を に割り当てなかったrat1のでrat1、x スケールのみを追加した後と同じ状態のままでした。

于 2013-08-17T16:13:21.020 に答える