Differences

This shows you the differences between two versions of the page.

--- r:social_network_analysis [2019/12/03 16:10] – [triad_data1.csv] hkimscil
+++ r:social_network_analysis [2019/12/03 16:14] – [Analysis (vis)] hkimscil
@@ Line 135: / Line 135: @@
 ====== Triad Data Visualizations ======
-===== triad_data1.csv =====
+===== Analysis (vis) =====
 <code>
 library(ggplot2)
@@ Line 173: / Line 173: @@
     geom_density_tern()                                 #define a data geometery
-ggtern(data=demodata1, aes(x=T1A, y=T1B, z=T1C)) +              #define data sources
+ggtern(data=demodata1, aes(x=Triad1A, y=Triad1B, z=Triad1C)) +              #define data sources
     geom_density_tern(aes(fill=..level.., alpha=..level..))     #define a data geometery with an aesthetic
 </code>
@@ Line 179: / Line 179: @@
 <code>
 #Or you can apply a color gradient to space between the contour lines
-ggtern(data=demodata1, aes(x=T1A, y=T1B, z=T1C)) +                          #define data sources
+ggtern(data=demodata1, aes(x=Triad1A, y=Triad1B, z=Triad1C)) +               #define data sources
-    stat_density_tern(aes(fill=..level.., alpha=..level..),geom='polygon') +#now you need to use stat_density_tern
+    stat_density_tern(aes(fill=..level.., alpha=..level..),geom='polygon') + #now you need to use stat_density_tern
     scale_fill_gradient2(high = "red") +                                    #define the fill color
     guides(color = "none", fill = "none", alpha = "none")                   #we don't want to display legend items
 </code>
+<code>
+ggtern(data=demodata1, aes(x=Triad1A, y=Triad1B, z=Triad1C)) +
+    stat_density_tern(aes(fill=..level.., alpha=..level..), geom='polygon') +
+    scale_fill_gradient2(high = "blue") +
+    geom_point() +
+    theme_showarrows() +
+    ggtitle("My Favorite Color") +
+    xlab("Red") +
+    ylab("Yellow") +
+    zlab("Blue") +
+    guides(color = "none", fill = "none", alpha = "none")
+</code>
+===== triad_data1.csv =====
 <file csv triad_data1.csv>
 ObsID,StartTime,EndTime,Triad1A,Triad1B,Triad1C,Triad2A,Triad2B,Triad2C,Triad3A,Triad3B,Triad3C,Diad1X,Diad1Y,Diad2X,Diad2Y,Diad3X,Diad3Y,Factor1,Factor2,Factor3,Landscape1XRight,Landscape1YTop