removing legend name editing cls1

Author: trevorcampbell

source/classification1.Rmd

@@ -336,13 +336,10 @@ perim_concav_with_new_point <-  bind_rows(cancer,
   labs(color = "Diagnosis", x = "Perimeter (standardized)", 
        y = "Concavity (standardized)") +
   scale_color_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"), 
                      values = c("steelblue2", "orange2", "red")) +
   scale_shape_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"),
                      values= c(16, 16, 18))+ 
   scale_size_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"),
                      values= c(2, 2, 2.5))
 perim_concav_with_new_point
 ```
@@ -394,13 +391,10 @@ perim_concav_with_new_point2 <- bind_rows(cancer,
        x = "Perimeter (standardized)", 
        y = "Concavity (standardized)") +
  scale_color_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"), 
                      values = c("steelblue2", "orange2", "red")) +
   scale_shape_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"),
                      values= c(16, 16, 18))+ 
   scale_size_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"),
                      values= c(2, 2, 2.5))
 perim_concav_with_new_point2 +  
   geom_segment(aes(
@@ -491,13 +485,10 @@ perim_concav <- bind_rows(cancer,
                      breaks = seq(-2, 4, 1)) +
   labs(color = "Diagnosis") + 
   scale_color_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"), 
                      values = c("steelblue2", "orange2", "red")) +
   scale_shape_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"),
                      values= c(16, 16, 18))+ 
   scale_size_manual(name = "Diagnosis", 
-                     labels = c("Benign", "Malignant", "Unknown"),
                      values= c(2, 2, 2.5))
 
 perim_concav