ggplot2 changes for legends and blank themes

swhustla · Sep 16, 2012 · fcdde7e · fcdde7e
1 parent fd9f955
commit fcdde7e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/08-PCA/chapter08.R b/08-PCA/chapter08.R
@@ -49,7 +49,7 @@ correlations <- as.numeric(cor.matrix)
 ggplot(data.frame(Correlation = correlations),
   aes(x = Correlation, fill = 1)) +
   geom_density() +
-  opts(legend.position = 'none')
+  theme(legend.position = 'none')
 
 # Sixth code snippet
 pca <- princomp(date.stock.matrix[,2:ncol(date.stock.matrix)])
@@ -77,7 +77,7 @@ loadings <- as.numeric(principal.component)
 ggplot(data.frame(Loading = loadings),
   aes(x = Loading, fill = 1)) +
   geom_density() +
-  opts(legend.position = 'none')
+  them(legend.position = 'none')
 
 # Tenth code snippet
 market.index <- predict(pca)[, 1]