adjusting size of zoomed in plot

Author: leem44

classification1.Rmd

@@ -999,7 +999,7 @@ ggarrange(unscaled, scaled, ncol = 2, common.legend = TRUE, legend = "bottom")
 
 ```
 
-```{r 05-scaling-plt-zoomed, fig.height = 5, fig.width = 10, echo = FALSE, fig.cap = "Close up of three nearest neighbors for unstandardized data."}
+```{r 05-scaling-plt-zoomed, fig.height = 4.5, fig.width = 9, echo = FALSE, fig.cap = "Close up of three nearest neighbors for unstandardized data."}
 library(ggforce)
 ggplot(unscaled_cancer, aes(x = Area, 
                             y = Smoothness, 
@@ -1034,7 +1034,8 @@ ggplot(unscaled_cancer, aes(x = Area,
   ), color = "black") +  
    facet_zoom(x = ( Area > 380 & Area < 420) , 
               y = (Smoothness > 0.08 & Smoothness < 0.14), zoom.size = 2) + 
-  theme_bw() + theme(legend.position="bottom", text = element_text(size = 16))
+    theme_bw() + 
+    theme(text = element_text(size = 14), legend.position="bottom")
 ```
 
 ### Balancing